File:Winter-NAO-Index-DE.svg
維基百科,自由的 encyclopedia
![File:Winter-NAO-Index-DE.svg](http://upload.wikimedia.org/wikipedia/commons/thumb/a/a3/Winter-NAO-Index-DE.svg/566px-Winter-NAO-Index-DE.svg.png)
此SVG文件的PNG预览的大小:566 × 351像素。 其他分辨率:320 × 198像素 | 640 × 397像素 | 1,024 × 635像素 | 1,280 × 794像素 | 2,560 × 1,588像素。
原始文件 (SVG文件,尺寸为566 × 351像素,文件大小:158 KB)
摘要
描述Winter-NAO-Index-DE.svg |
Deutsch: Nordatlantischen Oszillation (NAO).
Differenz der standardisierten Luftdruck (Gibraltar - Island, Dezember bis März) |
日期 | |
来源 |
自己的作品 - Datei Quelle : Climatic Research Unit, University of East Anglia. Referenzen : Jones, P.D., Jónsson, T. und Wheeler, D., 1997: Extension to the North Atlantic Oscillation using early instrumental pressure observations from Gibraltar and South-West Iceland. Int. J. Climatol. 17, 1433-1450. doi: 10.1002/(SICI)1097-0088(19971115)17:13<1433::AID-JOC203>3.0.CO;2-P |
作者 | Oeneis |
其他版本 |
[编辑]
|
许可协议
我,本作品著作权人,特此采用以下许可协议发表本作品:
![w:zh:知识共享](https://upload.wikimedia.org/wikipedia/commons/thumb/7/79/CC_some_rights_reserved.svg/90px-CC_some_rights_reserved.svg.png)
![署名](https://upload.wikimedia.org/wikipedia/commons/thumb/1/11/Cc-by_new_white.svg/24px-Cc-by_new_white.svg.png)
![相同方式共享](https://upload.wikimedia.org/wikipedia/commons/thumb/d/df/Cc-sa_white.svg/24px-Cc-sa_white.svg.png)
本文件采用知识共享署名-相同方式共享 4.0 国际许可协议授权。
- 您可以自由地:
- 共享 – 复制、发行并传播本作品
- 修改 – 改编作品
- 惟须遵守下列条件:
- 署名 – 您必须对作品进行署名,提供授权条款的链接,并说明是否对原始内容进行了更改。您可以用任何合理的方式来署名,但不得以任何方式表明许可人认可您或您的使用。
- 相同方式共享 – 如果您再混合、转换或者基于本作品进行创作,您必须以与原先许可协议相同或相兼容的许可协议分发您贡献的作品。
Create this graph
(annual and winter, in french, english, german)
R code
# Build multi languages plots for annual and winter NAO
# based on CRU data.
#
# Used for https://commons.wikimedia.org/wiki/Template:Other_versions/NAO_winter
# e.g. https://commons.wikimedia.org/wiki/File:Winter-NAO-Index.svg
# See https://commons.wikimedia.org/wiki/Template:Other_versions/NAO_winter.R to edit this file
library(dplyr)
library(readr)
library(tidyr)
library(ggplot2)
library(stringr)
library(glue)
theme_set(theme_bw())
theme_update(plot.caption = element_text(size = 7))
oldDec <- getOption("OutDec")
# get data : winter and annual
# add sign column for colors
nao_cru <- "https://crudata.uea.ac.uk/cru/data/nao/nao.dat" %>%
read_table(col_types = "iddddddddddddd", na = "-99.99", col_names = c("year", 1:12, "annual")) %>%
pivot_longer(-1, names_to = "period", values_to = "nao")
nao_cru_djfm <- nao_cru %>%
filter(period %in% c("12", "1", "2", "3")) %>%
mutate(winter = if_else(period == "12",
paste(year, year + 1, sep = "-"),
paste(year - 1, year, sep = "-"))) %>%
group_by(winter) %>%
summarise(nao = mean(nao, na.rm = TRUE)) %>%
mutate(year = as.numeric(str_extract(winter, "^\\d{4}")),
sign = if_else(nao < 0, "negative", "positive")) %>%
filter(year > 1822)
nao_cru_annual <- nao_cru %>%
filter(period == "annual") %>%
mutate(sign = if_else(nao < 0, "negative", "positive")) %>%
filter(year > 1822)
# manage languages
language <- list(
es_ES = list(
winter = list(
data = nao_cru_djfm,
title = "Índice de invierno de la Oscilación del Atlántico Norte (NAO)",
subtitle = "Gibraltar - SW de Islandia, de diciembre a marzo",
caption = "https://w.wiki/4b$m\nData : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. y Wheeler, D. (1997)\nActualizado regularmente. Accedido a",
x = "Año",
y = "Diferencia de presión normalizada a nivel del mar (hPa)",
outDec = "."
),
annual = list(
data = nao_cru_annual,
title = "Índice anual de la Oscilación del Atlántico Norte (NAO)",
subtitle = "Gibraltar - SW de Islandia",
caption = "Data : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. y Wheeler, D. (1997)\nActualizado regularmente. Accedido a",
x = "Año",
y = "Diferencia de presión normalizada a nivel del mar (hPa)",
outDec = "."
)
),
de_DE = list(
winter = list(
data = nao_cru_djfm,
title = "Nordatlantischen Oszillation (NAO) Winter Index",
subtitle = "Gibraltar - SW Island, Dezember bis März",
caption = "https://w.wiki/4b$m\nDatei : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. und Wheeler, D. (1997)\nRegelmäßig aktualisiert. Zugänglich am",
x = "Jahre",
y = "Differenz der standardisierten Luftdruck (hPa)",
outDec = ","
),
annual = list(
data = nao_cru_annual,
title = "Nordatlantischen Oszillation (NAO) Index",
subtitle = "Gibraltar - SW Island",
caption = "Datei : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. und Wheeler, D. (1997)\nRegelmäßig aktualisiert. Zugänglich am",
x = "Jahre",
y = "Differenz der standardisierten Luftdruck (hPa)",
outDec = ","
)
),
en_US = list(
winter = list(
data = nao_cru_djfm,
title = "North Atlantic Oscillation (NAO) winter index",
subtitle = "Gibraltar - SW Iceland, December to March",
caption = "https://w.wiki/4b$m\nData : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. and Wheeler, D. (1997)\nUpdated regularly. Accessed",
x = "Year",
y = "Difference of normalized sea level pressure (hPa)",
outDec = "."
),
annual = list(
data = nao_cru_annual,
title = "North Atlantic Oscillation (NAO) annual index",
subtitle = "Gibraltar - SW Iceland",
caption = "Data : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. and Wheeler, D. (1997)\nUpdated regularly. Accessed",
x = "Year",
y = "Difference of normalized sea level pressure (hPa)",
outDec = "."
)
),
fr_FR = list(
winter = list(
data = nao_cru_djfm,
title = "Indice hivernal de l'oscillation nord-atlantique (ONA)",
subtitle = "Gibraltar - SW Islande, décembre à mars",
caption = "https://w.wiki/4b$m\nDonnées : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. et Wheeler, D. (1997)\nMise à jour régulière. Accédé le",
x = "année",
y = "différence de pression normalisée (hPa)",
outDec = ","
),
annual = list(
data = nao_cru_annual,
title = "Indice annuel de l'oscillation nord-atlantique (ONA)",
subtitle = "Gibraltar - SW Islande",
caption = "Données : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. et Wheeler, D. (1997)\nMise à jour régulière. Accédé le",
x = "année",
y = "différence de pression normalisée (hPa)",
outDec = ","
)
),
it_IT = list(
winter = list(
data = nao_cru_djfm,
title = "Indice invernale dell'Oscillazione Nord Atlantica (NAO)",
subtitle = "Gibilterra - SW Islanda, da dicembre a marzo",
caption = "https://w.wiki/4b$m\nDati : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. e Wheeler, D. (1997)\nAggiornato regolarmente. Accesso a",
x = "Anno",
y = "Differenza di pressione normalizzata\nal livello del mare (hPa)",
outDec = ","
),
annual = list(
data = nao_cru_annual,
title = "Indice annuale dell'Oscillazione Nord Atlantica (NAO)",
subtitle = "Gibilterra - SW Islanda",
caption = "Dati : Climatic Research Unit, University of East Anglia.\nJones, P.D., Jónsson, T. e Wheeler, D. (1997)\nAggiornato regolarmente. Accesso a",
x = "Anno",
y = "Differenza di pressione normalizzata\nal livello del mare (hPa)",
outDec = ","
)
)
)
for (l in names(language)) {
message(l)
for (t in names(language[[l]])) {
message(t)
current <- language[[l]][[t]]
options(OutDec = current$outDec)
# plot graph
ggplot(current$data, aes(year, nao)) +
geom_col(aes(fill = sign)) +
geom_smooth(span = .1, color = "black", alpha = 0.3) +
scale_fill_manual(values = c("positive" = "darkorange2",
"negative" = "deepskyblue3")) +
scale_x_continuous(breaks = seq(1820, max(current$data$year), 20)) +
guides(fill = "none") +
labs(title = current$title,
subtitle = current$subtitle,
caption = glue("{current$caption} {format(Sys.Date(), '%Y-%m-%d')}"),
x = current$x,
y = current$y)
ggsave(file = glue("nao_cru_{t}_{l}_{Sys.Date()}.svg"),
width = 20,
height = 12.4,
units = "cm",
scale = 0.8,
device = svg)
}
}
options(OutDec = oldDec)
说明
添加一行文字以描述该文件所表现的内容
Winter index of the North Atlantic oscillation (plot in German)
Indice hivernal de l'Oscillation nord-atlantique (graphique en allemand)
此文件中描述的项目
描繪內容
28 9 2017
image/svg+xml
文件历史
点击某个日期/时间查看对应时刻的文件。
日期/时间 | 缩略图 | 大小 | 用户 | 备注 | |
---|---|---|---|---|---|
当前 | 2023年11月22日 (三) 07:46 | ![]() | 566 × 351(158 KB) | Oeneis | update 2022-2023 |
2022年12月22日 (四) 17:02 | ![]() | 566 × 351(157 KB) | Oeneis | 2022 update | |
2022年8月15日 (一) 08:14 | ![]() | 566 × 351(158 KB) | Oeneis | update with 2021-2022 data | |
2021年12月26日 (日) 17:16 | ![]() | 566 × 351(154 KB) | Oeneis | update wiki link | |
2021年12月26日 (日) 12:00 | ![]() | 566 × 351(153 KB) | Oeneis | 2020-2021 data. Using CRU data. German version | |
2021年12月26日 (日) 11:58 | ![]() | 566 × 351(155 KB) | Oeneis | 2020-2021 data. Using CRU data | |
2020年11月1日 (日) 13:27 | ![]() | 566 × 351(137 KB) | Oeneis | update 2019 data | |
2018年10月21日 (日) 08:21 | ![]() | 566 × 351(136 KB) | Oeneis | 2017-2018 data | |
2017年10月8日 (日) 14:50 | ![]() | 566 × 351(139 KB) | Oeneis | nicer svg renderer | |
2017年9月28日 (四) 20:15 | ![]() | 512 × 317(46 KB) | Oeneis | 2016-2017 datei |
文件用途
没有页面链接到本图像。
全域文件用途
以下其他wiki使用此文件:
- de.wikipedia.org上的用途
元数据
此文件中包含有扩展的信息。这些信息可能是由数码相机或扫描仪在创建或数字化过程中所添加。
如果此文件的源文件已经被修改,一些信息在修改后的文件中将不能完全反映出来。
宽度 | 453pt |
---|---|
高度 | 281pt |