library(data.table)
env_data <- data.table(
Station = "Station_1",
Komponente = rep(c("TMP", "NO2"), length.out = 100),
Wert = rnorm(100, mean = 20, sd = 5),
date = rep(seq.POSIXt(as.POSIXct("2022-01-01"), , "hour", 50), each = 2),
year = 2022,
Komponente_txt = rep(c("Temperature", "NO2"), length.out = 100)
)
plot <- plot_station_measurements(env_data, variables = c("TMP", "NO2"))
Run the code above in your browser using DataLab