Extending climaemet • climaemet

climaemet provides several functions for accessing a selection of endpoints of the AEMET API tool. However, this package does not cover in full all the capabilities of the API.

For that reason, we provide the get_data_aemet() function, that allows to access any API endpoint freely. The drawback is that the user would need to handle the results by him/herself.

library(climaemet)

Example: Normalized text

Some API endpoints, as predicciones-normalizadas-texto, provides the results as plain text on natural language. These results are not parsed by climaemet, but can be retrieved as this:

# endpoint, today forecast

today <- "/api/prediccion/nacional/hoy"

# Metadata
knitr::kable(get_metadata_aemet(today))

unidad_generadora	descripcion	periodicidad	formato	copyright	notaLegal
Grupo Funcional de Predicción de Referencia	Predicción general nacional para hoy / mañana / pasado mañana / medio plazo (tercer y cuarto día) / tendencia (del quinto al noveno día)	Disponibilidad. Para hoy, solo se confecciona si hay cambios significativos. Para mañana y pasado mañana diaria a las 15:00 h.o.p.. Para el medio plazo diaria a las 16:00 h.o.p.. La tendencia, diaria a las 18:30 h.o.p.	ascii/txt	© AEMET. Autorizado el uso de la información y su reproducción citando a AEMET como autora de la misma.	https://www.aemet.es/es/nota_legal


# Data
pred_today <- get_data_aemet(today)
#> 
#> Results are MIME type: text/plain
#> Returning data as string

# Produce a result

clean <- gsub("\r", "\n", pred_today, fixed = TRUE)
clean <- gsub("\n\n\n", "\n", clean, fixed = TRUE)

cat(paste("---\n\n", clean, "\n---"))

AGENCIA ESTATAL DE METEOROLOGÍA PREDICCIÓN GENERAL PARA ESPAÑA DÍA 06 DE ABRIL DE 2024 A LAS 08:55 HORA OFICIAL PREDICCIÓN VÁLIDA PARA EL SÁBADO 6

A.- FENÓMENOS SIGNIFICATIVOS Posibilidad de precipitaciones localmente fuertes en Canarias. Intervalos y/o rachas de viento fuerte o muy fuertes en Galicia, cordillera Cantábrica, norte de la Ibérica y Pirineos. Calimas en buena parte de Península y Baleares.

B.- PREDICCIÓN En la Península y Canarias se prevé la entrada de un frente atlántico por el noroeste, asociado a la borrasca Kathleen, que dejará cielos nubosos o cubiertos a su paso y precipitaciones en Galicia, Asturias, oeste de Castilla y León y gran parte del archipiélago canario. Con menor probabilidad cuanto más al este y sur, pueden extenderse a otras zonas de los tercios noroeste y oeste de la Península, pero no se espera que alcancen al resto de zonas y Baleares, donde predominarán intervalos de nubes altas. No se descarta que las precipitaciones sean localmente fuertes en las islas Canarias montañosas.

Son posibles brumas y bancos de niebla matinales en puntos del área mediterránea oriental y en el noroeste peninsular. Es probable la presencia de calima en gran parte de la Península.

Las temperaturas máximas descenderán en la mitad oeste peninsular y en Canarias, incluso en medianía de forma notable, y subirán en el cuadrante nordeste peninsular. Las mínimas descenderán en Galicia y Cantábrico, aumentando en el centro y sur peninsular.

Viento de componente este en Andalucía y Murcia, con Levante moderado en el Estrecho. Predominarán en el resto de la Península y Baleares los vientos de componente sur, con intervalos y/o rachas de fuerte o muy fuerte en Galicia, cordillera Cantábrica, norte de la Ibérica y Pirineos. En Canarias, viento del norte y noroeste.

Example: Maps

AEMET also provides map data, usually on image/gif format. One way to get this kind of data is as follows:

# Endpoint of a map
a_map <- "/api/mapasygraficos/analisis"

# Metadata
knitr::kable(get_metadata_aemet(a_map))

unidad_generadora	descripción	periodicidad	formato	copyright	notaLegal
Grupo Funcional de Jefes de Turno	Mapas de análisis de frentes en superficie	Dos veces al día, a las 02:00 y 14:00 h.o.p. en invierno y a las 03:00 y 15:00 en verano.	image/gif	© AEMET. Autorizado el uso de la información y su reproducción citando a AEMET como autora de la misma.	https://www.aemet.es/es/nota_legal


the_map <- get_data_aemet(a_map)
#> 
#> Results are MIME type: image/gif
#> Returning raw data


# Write as gif and include it
giffile <- "example-gif.gif"
writeBin(the_map, giffile)

# Display on the vignette
knitr::include_graphics(giffile)

Example: Surface analysis map provided by AEMET