# ------------------------------------------------------------------------------
#
# ------------------------------------------------------------------------------
# Meteostat's dictionary of weather stations
# dtStationsDict <- dtGetMeteostatWeatherStationsDict()
# usethis::use_data(dtStationsDict, internal = FALSE, overwrite = TRUE)
# cStationCountryName <- 12120L
# dtPlStationsDict <- dtStationsDict[cStationCountryName == "PL", ]
# iMeteostatStationId <- 12120L
# dateStartDate <- as.Date("2019-01-01")
# dateEndDate <- as.Date("2019-12-31")
# cApiKey <- "y2fkAGRIDf3fc88pnDxbkCoJnygfnDbg"
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.