This function add aggregate cols by `key_time`
Usage
obs_agg(
dt,
cols = c("year", "month", "day", "hour", "minute", "second", "time", "time_decimal",
"value", "latitude", "longitude", "altitude", "pressure", "u", "v", "temperature",
"type_altitude"),
by = c("key_time", "site_code", "altitude_final", "type_altitude", "lab_1_abbr",
"dataset_calibration_scale"),
fn = "mean",
verbose = TRUE
)Examples
if (FALSE) { # \dontrun{
# Do not run
obs <- system.file("data-raw", package = "rtorf")
index <- obs_summary(obs)
dt <- obs_read(index)
} # }
