diff --git a/MTUS-W9-adult-episodes-data-processing.Rmd b/MTUS-W9-adult-episodes-data-processing.Rmd index e2fcecf97cea6a2ef386324ad4351ac602963ab6..b07459c4aa818fd031d344f4a35796e5a397d60a 100644 --- a/MTUS-W9-adult-episodes-data-processing.Rmd +++ b/MTUS-W9-adult-episodes-data-processing.Rmd @@ -689,7 +689,7 @@ ggplot(mtusUKEpsDT) + mtusUKEpsDT <- mtusUKEpsDT[, epDurationMins := (r_epEndTime - r_epStartTime)/60] ggplot(mtusUKEpsDT) + - geom_histogram(aes(x = epDurationMins)) + + geom_histogram(aes(x = epDurationMins), binwidth = 10) + facet_grid(survey ~ .) + labs(x = "Episode duration (minutes)", caption = "MTUS UK samples")