s <- sca(y = "Salnty", x = "T_degC", controls = c("ChlorA", "O2Sat"),
data = bottles, progress_bar = FALSE, parallel = FALSE)
sca_report(s)
# \donttest{
result <- sca_test(y = "Salnty", x = "T_degC", controls = c("ChlorA", "O2Sat"),
data = bottles, n_permutations = 50, seed = 1,
progress_bar = FALSE)
sca_report(result)
# }
Run the code above in your browser using DataLab