Commit 3e950c25 authored by khalid's avatar khalid
Browse files

explicit load shinydashboard

parent d8d303dc
......@@ -259,8 +259,8 @@ generate_pages_server <- function() {
resG <- resG + "\t# \tPage : " + name + "\n"
path_page = output_dir+"/pages/pages_def_"+tolower(name)+".R"
file.replace(path_page)
res <- 'tab'+ name + ' = fluidPage(\n\n'
res <- 'library(shinydashboard)\n\n'
res <- res + 'tab'+ name + ' = fluidPage(\n\n'
res <- res + 'box(title = "Parameters :", width = 12, status = "primary", collapsible = TRUE, solidHeader = TRUE'
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment