# NOT RUN {
dat <- readActigraph("actfile.agd")
dat1s <- wearingMarking(dataset = dat,
frame = 90,
perMinuteCts = 1,
TS = "TimeStamp",
cts = "axis1",
streamFrame = NULL,
allowanceFrame= 2,
newcolname = "wearing",
getMinuteMarking = FALSE)
# }
Run the code above in your browser using DataLab