R/resource_frequency_resource.R

In edeaR: Exploratory and Descriptive Event-Based Data Analysis

Defines functions resource_frequency_resource

resource_frequency_resource <- function(log) {
	absolute <- NULL
	relative <- NULL

	log %>%
		distinct(!!resource_id_(log), !!activity_instance_id_(log)) %>%
		group_by(!!resource_id_(log)) %>%
		summarize(absolute = n()) %>%
		mutate(relative = absolute/sum(absolute))

}

Try the edeaR package in your browser