calculate_CFC {bpmnR}

Control Flow Complexity (CFC) ——————————————-

Description

Control Flow Complexity (CFC) ——————————————-

Usage

calculate_CFC(bpmn)

Arguments

bpmn

bpmn-object.

Value

Control-Flow-Complexity. Numeric vector of length 1

Examples

library(dplyr)
nodes <- tibble(id = "task", name = "Task name", objectType = "task",
gatewayDirection = NA)
events <- tibble(id = c("start","end"), name = c("Start event","End event"),
objectType = c("startEvent","endEvent"))
flows <- tibble(id = c("flow1","flow2"), name = c("flow1","flow2"),
sourceRef = c("start","task"), targetRef = c("task","end"),
objectType = c("sequenceFlow","sequenceFlow"))
model <- create_bpmn(nodes, flows, events)
calculate_CFC(model)