diff --git a/DESCRIPTION b/DESCRIPTION index 7da7aeabf4d730e58aae5c8b533284949a6875cf..569196d254db7b7b82cbc3e7115c326e1f95397e 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: shinyscreen Title: Pre-screening of Mass Spectrometry Data -Version: 0.9.5 +Version: 0.9.6 Author: Todor Kondić Maintainer: Todor Kondić <todor.kondic@uni.lu> Authors@R: diff --git a/R/api.R b/R/api.R index 9e8032056dcc36d7ca5ba80fb9723eb308839b13..42f22d14428691963c9085711859a699fcf70b6e 100644 --- a/R/api.R +++ b/R/api.R @@ -687,9 +687,9 @@ report <- function(m) { #' @export -app <- function() { +app <- function(shiny_args=NULL,render_args=NULL) { unlink(list.files(pattern = "app_run.*html$")) unlink(list.files(pattern = "app_run.*Rmd$")) file.copy(system.file(file.path("rmd","app.Rmd"),package = "shinyscreen"),"app_run.Rmd") - rmarkdown::run(file = "app_run.Rmd") + rmarkdown::run(file = "app_run.Rmd", shiny_args = shiny_args, render_args = render_args) }