tests/testthat/helper-core_data.R

In hendersontrent/sawlog: Tools for Handling Extraction of Features from Time Series

library(theft)
tmp <- theft::simData
tmp <- tmp[tmp$process %in% c("Gaussian Noise", "AR(1)"), ]

feature_matrix <- calculate_features(data = tmp, 
                                     id_var = "id", 
                                     time_var = "timepoint", 
                                     values_var = "values", 
                                     group_var = "process", 
                                     feature_set = "catch22", 
                                     catch24 = FALSE)