# Define obsTime
obsTime <- as.Date(c("2020-01-01",
"2020-01-02",
"2020-01-04"))
# Transform it to time index under different settings
transform_time_id(obsTime, "h", 1)
transform_time_id(obsTime, "m", 60)
transform_time_id(obsTime, "s", 3600)
# Define numeric obsTime
obsTime <- c(1,
1.5,
4.5,
6)
# Transform it to time index under different settings
transform_time_id(obsTime, "n", 1)
transform_time_id(obsTime, "n", 1.5)
Run the code above in your browser using DataLab