Added brackets screen time_diff

pull/95/head
kaguillera 2020-06-16 18:44:51 -04:00
parent f0b1d70828
commit 996e7307d7
1 changed files with 2 additions and 2 deletions

View File

@ -35,7 +35,7 @@ get_ios_screen_episodes <- function(screen){
group_by(episode_id) %>% group_by(episode_id) %>%
summarise(episode = "unlock", summarise(episode = "unlock",
screen_sequence = toString(screen_status), screen_sequence = toString(screen_status),
time_diff = (last(timestamp) - first(timestamp)) / 1000 * 60, time_diff = (last(timestamp) - first(timestamp)) / (1000 * 60),
local_start_date_time = first(local_date_time), local_start_date_time = first(local_date_time),
local_end_date_time = last(local_date_time), local_end_date_time = last(local_date_time),
local_start_date = first(local_date), local_start_date = first(local_date),
@ -64,7 +64,7 @@ get_android_screen_episodes <- function(screen){
filter( (screen_status == 3 & lead(screen_status) == 0) | (screen_status == 0 & lag(screen_status) == 3) ) %>% filter( (screen_status == 3 & lead(screen_status) == 0) | (screen_status == 0 & lag(screen_status) == 3) ) %>%
summarise(episode = "unlock", summarise(episode = "unlock",
screen_sequence = toString(screen_status), screen_sequence = toString(screen_status),
time_diff = (last(timestamp) - first(timestamp)) / 1000 * 60, time_diff = (last(timestamp) - first(timestamp)) / (1000 * 60),
local_start_date_time = first(local_date_time), local_start_date_time = first(local_date_time),
local_end_date_time = last(local_date_time), local_end_date_time = last(local_date_time),
local_start_date = first(local_date), local_start_date = first(local_date),