#load as tsl
#scale al variables
#aggregate to daily resolution
#align all time series to same temporal span
tsl <- tsl_initialize(
x = albatross,
name_column = "name",
time_column = "time"
) |>
tsl_transform(
f = f_scale_local
) |>
tsl_aggregate(
new_time = "days"
)
if(interactive()){
tsl_plot(
tsl = tsl,
guide_columns = 5
)
}
Run the code above in your browser using DataLab