R/idle_time_trace.R

In gertjanssenswillen/edeaR: Exploratory and Descriptive Event-Based Data Analysis

idle_time_trace <- function(eventlog, units) {

	cases <- case_list(eventlog)

	eventlog %>%
		idle_time_case(units = units) %>%
		merge(cases) %>%
		group_by(trace) %>%
		grouped_summary_statistics("idle_time")
}