From 19250948c9aa3f94eadadb90af1cbf3d567775be Mon Sep 17 00:00:00 2001 From: "Christopher S. Swingley" Date: Fri, 9 Oct 2015 08:35:35 -0800 Subject: [PATCH] slight changes to sleep variable names --- R/get_sleep_data.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/get_sleep_data.R b/R/get_sleep_data.R index e19cb1a..eff7375 100644 --- a/R/get_sleep_data.R +++ b/R/get_sleep_data.R @@ -46,10 +46,10 @@ get_sleep_data <- function(cookie, start_date="2015-01-13", end_date="2015-01-20 startTime = sapply(dat_list$entries, "[[", "startTime"), endTime = sapply(dat_list$entries, "[[", "endTime"), sleepDuration = sapply(dat_list$entries, "[[", "sleepDuration"), - awokenCount = sapply(dat_list$entries, "[[", "awokenCount"), + awakeCount = sapply(dat_list$entries, "[[", "awakeCount"), restlessCount = sapply(dat_list$entries, "[[", "restlessCount"), - awakeTime = sapply(dat_list$entries, "[[", "awakeTime"), - restlessTime = sapply(dat_list$entries, "[[", "restlessTime"), + awakeDuration = sapply(dat_list$entries, "[[", "awakeDuration"), + restlessDuration = sapply(dat_list$entries, "[[", "restlessDuration"), minAsleep = sapply(dat_list$entries, "[[", "minAsleep"), sleepQualityScoreB = sapply(dat_list$entries, "[[", "sleepQualityScoreB"), sleepQualityScoreA = sapply(dat_list$entries, "[[", "sleepQualityScoreA")),