payoffs_summary <- matrix(c(100, 200, 0.5, 0.7), ncol = 2,
dimnames = list(c("Strategy A", "Strategy B"),
c("cost", "utility")))
calculate_icers(payoffs_summary)
Run the code above in your browser using DataLab