Update doc

pages/pages_def_home.R

@@ -12,7 +12,7 @@ tabHome = fluidPage(align="left",
                                br(),
                                selectizeInput('fromTemplate', 'From:', choices = c(`ubuntu:16.04` = 'ubuntu:16.04', `r-base` = 'r-base'), selected = "r-base", multiple = FALSE),
                                br(),
-                               radioButtons("containerType", "Container type:", choices = list("Singularity" = "singularity", "Docker" = "docker"), selected = "docker"),
+                               radioButtons("containerType", "Container type:", choices = list("Singularity" = "singularity", "Docker" = "docker"), selected = "singularity"),
                                br(),
                                #selectizeInput('rcranpackagelist', 'R CRAN:', choices = NULL, multiple=TRUE, options = list(maxItems = 30000)),
                                selectizeInput('rtemplate', 'R origin:', choices = c(`None` = 'none', `R from source 3.4.3` = 'source', `R from source 3.4.4` = 'source2', `R from source 3.5.0` = 'source3', `R from r-base` = 'base', `R from CRAN depo` = 'cran'), selected = "none", multiple = FALSE),
@@ -22,6 +22,7 @@ tabHome = fluidPage(align="left",
                                
                                textAreaInput("customDataContainer", "Add custom line to container file:"),
                                br(), br(),
+                               p("Use button create for generate your file and the dowload button for get your file."),
                                actionButton("createContainer", label = "Create", icon("paper-plane"), style="color: #fff; background-color: #337ab7; border-color: #2e6da4"),
                                downloadButton('downloadContainerFile', label = "Dowload",  style="color: #fff; background-color: #337ab7; border-color: #2e6da4")
                                
@@ -35,28 +36,33 @@ tabHome = fluidPage(align="left",
                              solidHeader = TRUE,
                              status="primary",
                              tabsetPanel( id='rpackages',
-                                          tabPanel('CRAN',    
+                                          tabPanel('Bioinformatics tools',
+                                                   div(id = "formContainer",
+                                                       br(),
+                                                       selectizeInput('selectedBiocontainer', 'Biocontainer tools selected:', choices = NULL, multiple=TRUE, options = list(maxItems = 30000))),
+                                                   p("Add your tools by clicking on the corresponding fields in the table. They appear in the field so below."),
+                                                   DT::dataTableOutput('dtbiocontainer')
+                                          ),
+                                          tabPanel('CRAN Packages',    
+                                            p("Search your package in the filed call 'Package'  and click on the name of your package to select it."),
                                             withSpinner(DT::dataTableOutput('dtrcranpackage'), type = 4, proxy.height = "150px")
                                           ),
-                                          tabPanel('Bioconductor',   
+                                          tabPanel('Bioconductor Packages',   
                                             div(id = "formBioconductor",
                                             #  br(),
                                             #selectizeInput('selectedBioconductor', 'R Bioconductor selected:', choices = NULL, multiple=TRUE, options = list(maxItems = 30000)),
+                                            p("Search your package in the filed call 'Package'  and click on the name of your package to select it."),
                                             DT::dataTableOutput('dtrbioconductorpackage'))),
-                                          tabPanel('Github',
+                                          tabPanel('Github R Packages',
                                             textInput("inputGithub", "Package name:", ""),
                                             actionButton("findGithub", label = "Find", icon("paper-plane"), style="color: #fff; background-color: #337ab7; border-color: #2e6da4"),
                                             div(id = "formGithub",
                                             br(), br(),
                                             selectizeInput('rgithubpackagelist', 'R Github selected:', choices = NULL, multiple=TRUE, options = list(maxItems = 30000)),
+                                            p("Add your tools by clicking on the corresponding fields in the table. They appear in the field so below."),
                                             br(), br(),
-                                            DT::dataTableOutput('dtrgithubpackage'))),
-                                          tabPanel('BioContainer tools',
-                                                   div(id = "formContainer",
-                                                       br(),
-                                                   selectizeInput('selectedBiocontainer', 'Biocontainer tools selected:', choices = NULL, multiple=TRUE, options = list(maxItems = 30000))),
-                                                   DT::dataTableOutput('dtbiocontainer')
-                                                   )
+                                            DT::dataTableOutput('dtrgithubpackage')))
+                                          
                              )
                           )
                     ),