mirror of
https://github.com/agdamsbo/FreesearchR.git
synced 2025-09-12 01:49:39 +02:00
added title when grouping on tertiary variable
This commit is contained in:
parent
3fff0cc4f6
commit
c6f42a5640
2 changed files with 2 additions and 2 deletions
|
@ -92,7 +92,7 @@ plot_euler <- function(data, pri, sec, ter = NULL, seed = 2103) {
|
||||||
})
|
})
|
||||||
|
|
||||||
# names(out)
|
# names(out)
|
||||||
wrap_plot_list(out)
|
wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"))
|
||||||
# patchwork::wrap_plots(out, guides = "collect")
|
# patchwork::wrap_plots(out, guides = "collect")
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -24,6 +24,6 @@ plot_violin <- function(data, pri, sec, ter = NULL) {
|
||||||
)
|
)
|
||||||
})
|
})
|
||||||
|
|
||||||
wrap_plot_list(out)
|
wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}"))
|
||||||
# patchwork::wrap_plots(out,guides = "collect")
|
# patchwork::wrap_plots(out,guides = "collect")
|
||||||
}
|
}
|
||||||
|
|
Loading…
Add table
Reference in a new issue