# \donttest{
load(system.file("extdata/ECGExample.rda",package = "TSEAL"))
labels <- c(rep(1, 5), rep(2, 5))
CM <- LOOCV(ECGExample, labels, "haar", "linear",
maxvars = 5,
features = c("Var"), returnClassification = FALSE
)
# or with VStep
CMV <- LOOCV(ECGExample, labels, "haar", "linear",
VStep = 5,
features = c("Var", "Cor"), returnClassification = FALSE
)
# }
Run the code above in your browser using DataLab