# Multiple solutions
solutions <- list(
c("A*B", "C"),
c("A*B", "D"),
c("A*C")
)
chart <- config_chart_multi_solutions(solutions)
cat(chart)
# With EPI identification
chart <- config_chart_multi_solutions(solutions, show_epi = TRUE)
cat(chart)
Run the code above in your browser using DataLab