Commit 699af2cd authored by mmassaviol's avatar mmassaviol
Browse files

Debug volumes and changer default threads number

parent 80704f20
......@@ -680,8 +680,11 @@ generate_pages_server <- function() {
if ("volumes" %in% names(cnt)){
volumes = 'c('
for (key in names(cnt$volumes[[1]]))
volumes = paste0(volumes,key,'="',cnt$volumes[[1]][key],'",')
for (volume in cnt$volumes){
key = names(volume)
val = unlist(volume)
volumes = paste0(volumes,key,'="',val,'",')
}
volumes = substr(volumes, 1, nchar(volumes)-1)
volumes = paste0(volumes,')')
}
......@@ -736,7 +739,7 @@ generate_menu <- function() {
res <- res + '\ttags$br(),\n\n'
res <- res + '\tnumericInput("cores", label = "Threads available", min = 1, max = 16, step = 1, width = "auto", value = 4),\n'
res <- res + '\tnumericInput("cores", label = "Threads available", min = 1, max = 24, step = 1, width = "auto", value = 16),\n'
# select step to reach
choices = "list("
......
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