In tdschenk/GPActivity: What the package does (short line)

This is an automatically generated report for GENEActiv epochal data.

library(devtools)
library(knitr)
library(reshape)
install_github("GPActivity", username = "tdschenk", ref = "master")
df <- GPActivity::gpa.process("C:/Users/Tyler/Documents/GENEActiv/Data/60sJS.csv", 100)
sleep <- GPActivity::gpa.sleepsummary(df, 100)

Figure 1: Daily summary of sleep times/efficiency and energy expenditure

print <- sleep
print$Bedtime <- substring(print$Bedtime, 12, 16)
print$Risetime <- substring(print$Risetime, 12, 16)
kable(print, format = "pandoc")

GPActivity::gpa.activity.plot(df)

Figure 2: Daily graphs of energy expenditure (MET/min)

GPActivity::gpa.lighttemp.plot(df)

Figure 3: Daily graphs of temperature (Celsius) and light exposure (Lux)

counts <- GPActivity::gpa.wakesummary(df, sleep)
GPActivity::gpa.piecharts(counts)

Figure 4: Daily charts of activity intensities

print <- GPActivity::gpa.activity.totals(counts)
print[is.na(print)] <- 0
kable(print, format = "pandoc")

tdschenk/GPActivity documentation built on May 31, 2019, 7:38 a.m.