andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2025-09-12 09:59:39 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

feat: suppress warnings when plotting violin plots

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-08-08 11:47:55 +02:00
parent 46db0bd5e4
commit ca65bca2f8
No known key found for this signature in database
1 changed files with 13 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
R/plot_violin.R
View file

@ -14,6 +14,8 @@ plot_violin <- function(data, pri, sec, ter = NULL) {
ds <- list(data) ds <- list(data)
} }
# browser()
suppressWarnings({
out <- lapply(ds, \(.ds){ out <- lapply(ds, \(.ds){
rempsyc::nice_violin( rempsyc::nice_violin(
data = .ds, data = .ds,
@ -24,6 +26,7 @@ plot_violin <- function(data, pri, sec, ter = NULL) {
) )
}) })
wrap_plot_list(out,title=glue::glue("Grouped by {get_label(data,ter)}")) 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")
} }