tsl <- tsl_initialize(
x = distantia::albatross,
name_column = "name",
time_column = "time"
) |>
tsl_transform(
f = f_scale_global
)
#importance data frame
df <- momentum(
tsl = tsl
)
df
#to wide format
df_wide <- momentum_to_wide(
df = df
)
df_wide
Run the code above in your browser using DataLab