Skip to content

Commit

Permalink
Merge branch 'hotfix/ggplot_3.5.0' into develop
Browse files Browse the repository at this point in the history
  • Loading branch information
dmphillippo committed Mar 6, 2024
2 parents 1fd3d71 + 8257f5a commit 913c959
Show file tree
Hide file tree
Showing 3 changed files with 316 additions and 316 deletions.
10 changes: 5 additions & 5 deletions tests/testthat/test-example_smoking.R
Original file line number Diff line number Diff line change
Expand Up @@ -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())

Expand All @@ -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%"----------------
Expand All @@ -63,7 +63,7 @@ smkfit <- nma(smknet,
smkfit


## ----eval=FALSE-----------------------------------------------------------------------------------
## ---- eval=FALSE----------------------------------------------------------------------------------
## # Not run
## print(smkfit, pars = c("d", "tau", "mu", "delta"))

Expand Down Expand Up @@ -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---------------------------------------------------------------
Expand Down
2 changes: 1 addition & 1 deletion vignettes/example_smoking.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down
Loading

0 comments on commit 913c959

Please sign in to comment.