set.seed(123)
ts_data <- stats::arima.sim(list(order = c(1, 1, 0), ar = 0.6), n = 200)
# Single measure
comp_single <- complexity(ts_data, measures = "complexity")
# Multiple measures
comp_multi <- complexity(ts_data, measures = c("complexity", "variance"))
Run the code above in your browser using DataLab