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

linting

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2024-02-27 13:20:21 +01:00
commit 9e33057c06
32 changed files with 456 additions and 340 deletions
Download patch file Download diff file Expand all files Collapse all files

7
R/shiny_cast.R
View file

@ -14,8 +14,7 @@ server_factory <- function() {
#' @export
ui_factory <- function() {
# require(ggplot2)
source(here::here("app/ui.R"))
source(here::here("app/ui.R"))
}
#' Launch the included Shiny-app for database casting and upload
@ -46,7 +45,7 @@ shiny_cast <- function() {
#' @examples
#' # deploy_shiny
#'
deploy_shiny <- function(path=here::here("app/"), name.app="shiny_cast"){
deploy_shiny <- function(path = here::here("app/"), name.app = "shiny_cast") {
# Connecting
rsconnect::setAccountInfo(
name = "cognitiveindex",
@ -55,5 +54,5 @@ deploy_shiny <- function(path=here::here("app/"), name.app="shiny_cast"){
)
# Deploying
rsconnect::deployApp(appDir = path,lint = TRUE,appName = name.app,)
rsconnect::deployApp(appDir = path, lint = TRUE, appName = name.app, )
}