get_all_index
Downloads all index returning a data.frame
get_all_index(nao = TRUE, olr = TRUE, oni = TRUE, pdo = TRUE, pna = TRUE, soi = TRUE, sstoi = TRUE, aao = TRUE)
nao | Logica; inlude nao? |
---|---|
olr | Logica; inlude olr? |
oni | Logica; inlude oni? |
pdo | Logica; inlude pdo? |
pna | Logica; inlude pna? |
soi | Logica; inlude soi? |
sstoi | Logica; inlude sstoi? |
aao | Logica; inlude aao? |
data.frame
From https://www.ncdc.noaa.gov/teleconnections/enso/indicators/
# NOT RUN { #do not run a <- get_all_index() head(a) tail(a) b <- get_all_index(olr = FALSE) library(ggplot2) library(cptcity) ggplot(b, aes(x = Date, y = index, colour = index)) + geom_line()+ facet_wrap(~name, ncol = 3, scales = "free") + theme_bw() + scale_colour_gradientn(colours = rev(cpt(find_cpt("cb_div_RdB")[2])), limit = c(-4.6, 4.6)) head(b) tail(b) # }