env_data <- data.table::data.table(
Station = c("StationA", "StationA", "StationA"),
Komponente = c("NO2", "TMP", "NO2"),
Wert = c(50, 20, 40),
date = as.POSIXct(c("2023-01-01 10:00:00", "2023-01-01 11:00:00", "2023-01-02 12:00:00"))
)
params <- list(meteo_variables = c("TMP"), target = "NO2")
prepared_data <- prepare_data_for_modelling(env_data, params)
print(prepared_data)
Run the code above in your browser using DataLab