scripts/actman_runner.R

# actman runner
rm(list = ls(pos = '.GlobalEnv', all.names = TRUE), pos = '.GlobalEnv')
unloadNamespace('ACTman')
library('ACTman', character.only = TRUE)
setwd("/Users/ando/Documents/actman/new")


# Test with ActiWatch data
#result <- ACTman(workdir = "/Users/ando/Documents/actman/mydataactiwatch", myACTdevice = "Actiwatch2")


# Test with MW8 data
result2 <- ACTman(workdir = "/Users/ando/Documents/actman/new",
                  sleepdatadir = "/Users/ando/Documents/actman/new",
                  iwantsleepanalysis = TRUE,
                  myACTdevice = "MW8")
View(result2)
compsy/ACTman documentation built on Oct. 1, 2023, 8:40 a.m.