R/resource_involvement_case.R

Defines functions resource_involvement_case

resource_involvement_case <- function(eventlog) {

	absolute <- NULL
	relative <- NULL

	eventlog %>%
		group_by(!!case_id_(eventlog),  !!resource_id_(eventlog)) %>%
		summarize() %>%
		summarize(absolute = n()) %>%
		mutate(relative = absolute/n_resources(eventlog))
}
gertjanssenswillen/edeaR documentation built on July 22, 2019, 7:08 p.m.