Nothing
## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.width = 6
)
## ----setup, results='hide', message=FALSE, warning=FALSE, echo=FALSE----------
library(BCEA)
library(dplyr)
library(reshape2)
library(ggplot2)
library(purrr)
## -----------------------------------------------------------------------------
data("Vaccine")
he <- bcea(eff, cost, ref = 2)
## -----------------------------------------------------------------------------
contour(he, graph = "base")
contour(he, graph = "ggplot2")
# ceac.plot(he, graph = "plotly")
## -----------------------------------------------------------------------------
contour(he, levels = c(0.2, 0.8))
contour(he, graph = "ggplot2", contour = list(breaks = c(0.2, 0.8)))
## -----------------------------------------------------------------------------
contour(he,
graph = "ggplot2",
title = "my title",
point = list(color = "blue", shape = 2, size = 5),
contour = list(size = 2))
## -----------------------------------------------------------------------------
contour(he,
graph = "base",
title = "my title",
point = list(color = "blue", shape = 2, size = 2),
contour = list(size = 2))
## -----------------------------------------------------------------------------
contour2(he, graph = "base")
contour2(he, graph = "ggplot2")
# ceac.plot(he, graph = "plotly")
## -----------------------------------------------------------------------------
contour2(he,
graph = "ggplot2",
title = "my title",
point = list(color = "blue", shape = 10, size = 5),
contour = list(size = 2))
## -----------------------------------------------------------------------------
contour2(he,
graph = "base",
title = "my title",
point = list(color = "blue", shape = 2, size = 3),
contour = list(size = 4))
## -----------------------------------------------------------------------------
data("Smoking")
he <- bcea(eff, cost, ref = 4)
# str(he)
## -----------------------------------------------------------------------------
contour(he)
contour(he, graph = "ggplot2")
## -----------------------------------------------------------------------------
contour(he, scale = 0.9)
contour(he, graph = "ggplot2", scale = 0.9) ##TODO: what is the equivalent ggplot2 argument?
## -----------------------------------------------------------------------------
contour(he, nlevels = 10)
contour(he, graph = "ggplot2", contour = list(bins = 10))
## -----------------------------------------------------------------------------
contour(he, levels = c(0.2, 0.8))
contour(he, graph = "ggplot2", contour = list(breaks = c(0.2, 0.8)))
## -----------------------------------------------------------------------------
contour(he,
graph = "ggplot2",
title = "my title",
line = list(color = "red", size = 1),
point = list(color = c("plum", "tomato", "springgreen"), shape = 3:5, size = 2),
icer = list(color = c("red", "orange", "black"), size = 5),
contour = list(size = 2))
## -----------------------------------------------------------------------------
contour(he,
graph = "base",
title = "my title",
line = list(color = "red", size = 1),
point = list(color = c("plum", "tomato", "springgreen"), shape = 3:5, size = 2),
icer = list(color = c("red", "orange", "black"), size = 5),
contour = list(size = 4))
## -----------------------------------------------------------------------------
contour2(he, wtp = 250)
contour2(he, wtp = 250, graph = "ggplot2")
## -----------------------------------------------------------------------------
contour2(he, wtp = 250,
graph = "ggplot2",
title = "my title",
line = list(color = "red", size = 1),
point = list(color = c("plum", "tomato", "springgreen"), shape = 3:5, size = 2),
icer = list(color = c("red", "orange", "black"), size = 5),
contour = list(size = 2))
## -----------------------------------------------------------------------------
contour2(he, wtp = 250,
graph = "base",
title = "my title",
line = list(color = "red", size = 1),
point = list(color = c("plum", "tomato", "springgreen"), shape = 3:5, size = 2),
icer = list(color = c("red", "orange", "black"), size = 5),
contour = list(size = 4))
## -----------------------------------------------------------------------------
contour(he, pos = FALSE) # bottom right
contour(he, pos = c(0, 0))
contour(he, pos = c(0, 1))
contour(he, pos = c(1, 0))
contour(he, pos = c(1, 1))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.