From 87bd06d22bc853a2137af27aeeb09fb778b93252 Mon Sep 17 00:00:00 2001 From: Gianluca Baio Date: Tue, 21 Nov 2023 23:37:51 +0000 Subject: [PATCH] Remove .save files --- .../rmarkdown/report/section_ceplane.Rmd.save | 21 ------------------- 1 file changed, 21 deletions(-) delete mode 100644 inst/rmarkdown/report/section_ceplane.Rmd.save diff --git a/inst/rmarkdown/report/section_ceplane.Rmd.save b/inst/rmarkdown/report/section_ceplane.Rmd.save deleted file mode 100644 index 6ac04b8a..00000000 --- a/inst/rmarkdown/report/section_ceplane.Rmd.save +++ /dev/null @@ -1,21 +0,0 @@ - -## Cost-effectiveness plane - -The following graph shows the _cost-effectiveness plane_. This presents the joint distribution of the population average benefit and cost differential, $(\Delta_e,\Delta_c)$ and can be used to assess the uncertainty underlying the decision-making problem. - -Each point in the graph represents a 'potential future' in terms of expected incremental economic outcomes. The shaded portion of the plane is the _'sustainability area'_. The more points lay in the sustainability area, the more likely that the reference intervention will turn out to be cost-effective, at a given willingness to pay threshold, $k$ (in this case selected at $k=$ `r rmd_ -params$wtp`). - - -```{r, echo=echo, fig.width=4.6, fig.height=4.6, fig.align=align, warning=FALSE, message=FALSE, comment=NA} -n.ints <- m$n_comparators - -if (n.ints == 2) { - graph <- "base" - pos <- c(1, 1) -} else { - graph <- "ggplot2" - pos <- TRUE -} -ceplane.plot(m, graph = graph, pos = pos, wtp = rmd_params$wtp) -```