input_folder <- paste(system.file("extdata", "", package = "activPAL"),"/",sep="")
output_folder <- paste(tempdir(),"/",sep="")
activPAL::activity.summary.by.window.duration(input_folder,output_folder,2)
# Omitting a value for window_duration sets the default window size to 2 hours
activPAL::activity.summary.by.window.duration(input_folder,output_folder)
# You can set the window_duration to a time period that is not evenly divisible
# by 24 hours. In this case the last reporting period for each day will be
# shorter than the specified window_duration.
activPAL::activity.summary.by.window.duration(input_folder,output_folder,3.5)
Run the code above in your browser using DataLab