Merge branch 'hotfix/ggplot_3.5.0'

dmphillippo · Mar 6, 2024 · 805b58e · 805b58e
2 parents dd1e968 + 8257f5a
commit 805b58e
Show file tree

Hide file tree

Showing 3 changed files with 316 additions and 316 deletions.
diff --git a/tests/testthat/test-example_smoking.R b/tests/testthat/test-example_smoking.R
@@ -8,10 +8,10 @@ skip_on_cran()
 params <-
 list(run_tests = FALSE)
 
-## ----code=readLines("children/knitr_setup.R"), include=FALSE--------------------------------------
+## ---- code=readLines("children/knitr_setup.R"), include=FALSE-------------------------------------
 
 
-## ----eval = FALSE---------------------------------------------------------------------------------
+## ---- eval = FALSE--------------------------------------------------------------------------------
 ## library(multinma)
 ## options(mc.cores = parallel::detectCores())
 
@@ -37,7 +37,7 @@ smknet <- set_agd_arm(smoking,
 smknet
 
 
-## ----eval=FALSE-----------------------------------------------------------------------------------
+## ---- eval=FALSE----------------------------------------------------------------------------------
 ## plot(smknet, weight_edges = TRUE, weight_nodes = TRUE)
 
 ## ----smoking_network_plot, echo=FALSE, fig.width=8, fig.height=6, out.width="100%"----------------
@@ -63,7 +63,7 @@ smkfit <- nma(smknet,
 smkfit
 
 
-## ----eval=FALSE-----------------------------------------------------------------------------------
+## ---- eval=FALSE----------------------------------------------------------------------------------
 ## # Not run
 ## print(smkfit, pars = c("d", "tau", "mu", "delta"))
 
@@ -122,7 +122,7 @@ summary(smk_nodesplit)
 
 ## ----smk_nodesplit, fig.width = 7-----------------------------------------------------------------
 plot(smk_nodesplit) +
-  ggplot2::theme(legend.position = "bottom", legend.direct = "horizontal")
+  ggplot2::theme(legend.position = "bottom", legend.direction = "horizontal")
 
 
 ## ----smoking_releff, fig.height=4.5---------------------------------------------------------------

diff --git a/vignettes/example_smoking.Rmd b/vignettes/example_smoking.Rmd
@@ -175,7 +175,7 @@ These are all in agreement; the posterior densities of the direct and indirect e
 Notice that there is not much indirect information for the Individual counselling vs. No intervention comparison, so the network (consistency) estimate is very similar to the direct estimate for this comparison.
 ```{r smk_nodesplit, fig.width = 7}
 plot(smk_nodesplit) +
-  ggplot2::theme(legend.position = "bottom", legend.direct = "horizontal")
+  ggplot2::theme(legend.position = "bottom", legend.direction = "horizontal")
 ```
 
 ## Further results