#distance metric
d <- "euclidean"
#simulate zoo time series
x <- zoo_simulate(
name = "x",
rows = 100,
seasons = 2,
seed = 1
)
#sum distance between consecutive samples
psi_auto_distance(
x = x,
distance = d
)
Run the code above in your browser using DataLab