diff --git a/R/create_eventlogs.R b/R/create_eventlogs.R index 906952d..cddc37e 100644 --- a/R/create_eventlogs.R +++ b/R/create_eventlogs.R @@ -127,6 +127,7 @@ create_eventlogs <- function(data, xmlpath = NULL, case_cutoff = 20, dat7$glossar <- NULL } + dat7 <- dat7[order(dat7$fileId.start, dat7$date.start, dat7$timeMs.start), ] if (save) save(dat, dat1, dat2, dat3, dat4, dat5, dat7, file = "results/tmp_intermediate-df.RData") dat7 }