visGroup(data,ID,activity,type,title,yaxis,xaxis,time,legendTitle, groupBy,groupFun,levels,heatcol)
##
## Example: A box plot
##
## Not run:
# library(acc)
# data(NHANES)
# NHANES_subset <- NHANES[1:300,]
# visGroup(
# data = NHANES_subset,
# activity = 'wearTime',
# ID = 'ID',
# type = 'boxplot',
# title = "Wear time at baseline",
# yaxis = "Wear time (minutes per day)",xaxis=TRUE)
#
#
# ##
# ## Example: A heatmap
# ##
# library(acc)
# data(NHANES)
# NHANES_subset <- NHANES[1:1000,]
#
# visGroup(
# data = NHANES_subset,
# ID = 'ID',activity = 'wearTime',
# type = 'heatmap',title = "Wear time at baseline",
# yaxis = "ID",time = 'Day',
# legendTitle = "Wear time",
# groupBy = 'VO2max',groupFun = 'median',
# levels = c(0,300,600,1440),
# heatcol = c("white","mistyrose","lightpink","violetred1"))
# ## End(Not run)
Run the code above in your browser using DataLab