andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2026-06-21 05:19:07 +02:00
Code Issues Projects Releases Packages Wiki Activity

Deploying to gh-pages from @ agdamsbo/FreesearchR@8961bc6a5d 🚀

Browse source
This commit is contained in:
agdamsbo 2026-03-24 12:02:27 +00:00
commit c2c2302f90
59 changed files with 1557 additions and 210 deletions
Download patch file Download diff file Expand all files Collapse all files

18
reference/plot_euler.md
View file

@ -5,7 +5,7 @@ Easily plot euler diagrams
## Usage
``` r
plot_euler(data, pri, sec, ter = NULL, seed = 2103)
plot_euler(data, pri, sec, ter = NULL, seed = 2103, color.palette = "viridis")
```
## Arguments
@ -43,10 +43,22 @@ data.frame(
C = sample(c(TRUE, FALSE, FALSE, FALSE), 50, TRUE),
D = sample(c(TRUE, FALSE, FALSE, FALSE), 50, TRUE)
) |> plot_euler("A", c("B", "C"), "D", seed = 4)
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
#> Error in plot_euler(data.frame(A = sample(c(TRUE, TRUE, FALSE), 50, TRUE), B = sample(c("A", "C"), 50, TRUE), C = sample(c(TRUE, FALSE, FALSE, FALSE), 50, TRUE), D = sample(c(TRUE, FALSE, FALSE, FALSE), 50, TRUE)), "A", c("B", "C"), "D", seed = 4): object 'i18n' not found
mtcars |> plot_euler("vs", "am", seed = 1)
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
mtcars |> plot_euler("vs", "am", "cyl", seed = 1)
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
#> Error in plot_euler(mtcars, "vs", "am", "cyl", seed = 1): object 'i18n' not found
stRoke::trial |>
dplyr::mutate(
@ -61,7 +73,11 @@ stRoke::trial |>
) |>
dplyr::bind_cols() |>
plot_euler("mfi_cut", "mdi_cut")
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
stRoke::trial |>
plot_euler(pri="male", sec=c("hypertension"))
#> Scale for fill is already present.
#> Adding another scale for fill, which will replace the existing scale.
```