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

bug on plot export

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-05-08 10:12:36 +02:00
parent 93dabe4f1d
commit ab22a3a7e5
No known key found for this signature in database
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
R/data_plots.R
View file

@ -395,7 +395,9 @@ data_visuals_server <- function(id,
content = function(file) { content = function(file) {
if (inherits(rv$plot,"patchwork")){ if (inherits(rv$plot,"patchwork")){
plot <- rv$plot plot <- rv$plot
} else { } else if (inherits(rv$plot,"ggplot")){
plot <- rv$plot
}else {
plot <- rv$plot[[1]] plot <- rv$plot[[1]]
} }
@ -421,7 +423,6 @@ data_visuals_server <- function(id,
) )
} }
#' Select all from vector but #' Select all from vector but
#' #'
#' @param data vector #' @param data vector