Closed dimfalk closed 5 months ago
library(netatmo.weather)
#> 0.5.8
e <- get_extent(c(6.89, 51.34, 7.13, 51.53))
stations <- get_publicdata(ext = e)
p1 <- get_period()
as.POSIXct(p1)
#> "2024-03-29 19:40:00 CET" "2024-04-02 10:00:00 CEST"
obs <- get_measure(stations[1:10, ], period = p1, par = "temperature")
plot(obs[[3]])