Merge pull request #4 from cswingle/master

slight changes to sleep variable names
corynissen · Feb 23, 2016 · 118b712 · 118b712
2 parents 979c21f + 1925094
commit 118b712
Showing 1 changed file with 3 additions and 3 deletions.
diff --git 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")),