tests/testthat/helper-core_data.R

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)

Try the theft package in your browser

Any scripts or data that you put into this service are public.

theft documentation built on Oct. 4, 2024, 1:08 a.m.