file = system.file("extdata/P30_wrist100.csv.gz", package = "stepcount")
if (stepcount_check()) {
out = sc_read(file)
}
if (FALSE) {
file = system.file("extdata/P30_wrist100.csv.gz", package = "stepcount")
if (stepcount_check()) {
out = sc_read(file, sample_rate = 100L)
}
}
Run the code above in your browser using DataLab