R:Renderui无法正确初始化

时间:2018-07-10 08:44:11

标签: r shiny

我做了一个闪亮的用户界面。 在大多数情况下,它可以正确初始化,但是有时当我加载我的应用程序时,renderui创建的组合框不会显示,并且我必须重新加载我的URL。

出现问题时,请查看以下图片: enter image description here 这是工作时的图片: enter image description here 这是我的代码:

用户界面部分:

rm(list = ls(all = TRUE)) 

library(shiny)
library(jsonlite)
library(httr)
library(plotly)
# On definit le path
setwd("Mypath")

#UI Shiny app
shinyUI(

tabsetPanel(id='tabs',


          tabPanel("Report",
                   shinyjs::useShinyjs(),


                   #hr() ligne
                   hr(),
                   # Multiple choices Listbox pour Group
                   h4(uiOutput("Area")),

                   column(4,actionButton("Act",h4("Launch the report",style = "color:blue"),icon = icon("refresh"), class="btn-primary", style="color:white")

                   )

          )

) # END TabsetPanel

)   # End ShinyServer UI

服务器部分:

# 0 : We load the libraries
library(shinyjs)
#Repository
setwd("MyPath")


shinyServer (function(input, output, session){
shinyjs::disable("Act")

withProgress(message = 'Loading data', value = 0, {

# Increment the progress bar, and update the detail text.
incProgress(1/2, detail = paste(" ... please WAIT"))


merge_file <- structure(list(Workareabis = c("G3", "G1", "G3", "G2", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G4", "G4", "G4", "G4", "G4", 
                               "G2", "G2", "G2", "G2", "G2", "G2", "G2", "G2", "G2", "G5", "G5", 
                               "G5", "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", 
                               "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", 
                               "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", 
                               "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", 
                               "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", 
                               "G5", "G5", "G3", "G3", "G5", "G3", "G3", "G5", "G3", "G3", "G5", 
                               "G3", "G3", "G5", "G3", "G3", "G3", "G3", "G6", "G3", "G3", "G3", 
                               "G3", "G3", "G6", "G3", "G3", "G3", "G3", "G6", "G3", "G3", "G3", 
                               "G3", "G6", "G3", "G3", "G3", "G3", "G6", "G3", "G3", "G3", "G3", 
                               "G7", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G7", "G3", "G3", 
                               "G3", "G7", "G2", "G2", "G2", "G2", "G2", "G2", "G2", "G2", "G2", 
                               "G2", "G2", "G2", "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", 
                               "G3", "G7", "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", 
                               "G7", "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G7", 
                               "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G7", "G3", 
                               "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G7", "G2", "G2", 
                               "G2", "G2", "G2", "G2", "G2", "G3", "G3", "G3", "G3", "G7", "G3", 
                               "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G3", "G7", 
                               "G3", "G3", "G3", "G3", "G3", "G6", "G3", "G3", "G3", "G3", "G7", 
                               "G3", "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G3", 
                               "G7", "G3", "G3", "G3", "G3", "G3", "G7", "G3", "G2", "G2", "G3", 
                               "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G3", "G7", "G3", "G3", 
                               "G3", "G3", "G3", "G6", "G3", "G3", "G3", "G6", "G3", "G3", "G3", 
                               "G3", "G6", "G3", "G3", "G3", "G6", "G3", "G3", "G3", "G3", "G6", 
                               "G3", "G3", "G3", "G3", "G6", "G3", "G3", "G3", "G3", "G6", "G3", 
                               "G3", "G3", "G3", "G6", "G3", "G3", "G3", "G3", "G6", "G3", "G3", 
                               "G3", "G3", "G6", "G3", "G3", "G3", "G3", "G6", "G3", "G3", "G3", 
                               "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", 
                               "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", 
                               "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", 
                               "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", 
                               "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", 
                               "G7", "G3", "G3", "G3", "G3", "G7", "G3", "G3", "G3", "G3", "G7", 
                               "G1", "G3", "G3", "G3", "G3", "G3", "G3", "G1", "G1", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", 
                               "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", 
                               "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", 
                               "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", 
                               "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", 
                               "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", 
                               "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", 
                               "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", 
                               "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G1", 
                               "G3", "G3", "G3", "G1", "G8", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G8", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G8", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", 
                               "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", 
                               "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", "G3", 
                               "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", "G3", 
                               "G3", "G3", "G3", "G3", "G1", "G3", "G3", "G3", "G3", "G3", "G1", 
                               "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", 
                               "G3", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", 
                               "G3", "G9", "G3", "G3", "G3", "G9", "G3", "G3", "G3", "G9", "G3", 
                               "G3", "G3", "G2", "G2", "G10", "G10", "G10", "G10", "G10", "G10", 
                               "G10", "G10", "G3", "G10", "G10", "G10", "G10", "G10", "G10", 
                               "G10", "G10", "G10", "G10", "G9", "G9", "G9", "G9", "G9", "G9", 
                               "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", 
                               "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", 
                               "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G9", "G3", "G2", "G2", 
                               "G2", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G11", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G11", "G3", "G3", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G11", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G11", "G3", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G11", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G11", "G3", "G3", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G11", "G3", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G11", "G3", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G11", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G11", 
                               "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G3", "G11", 
                               "G3"), score = c(0, 0, 0, 8.21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.61, 0, 3.77, 
                                                0, 10.61, 17.83, 0, 0.68, 0, 15.03, 0.19, 0, 2.69, 0.58, 1.17, 
                                                0, 0, 0, 0, 1.08, 0, 0, 11.51, 0, 0, 0, 0, 0, 0.01, 0, 0, 0, 
                                                0, 24, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                                                1.55, 0, 0, 0, 0, 0, 4.95, 0, 0, 0, 0, 0, 22.63, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.83, 0, 0, 0, 0, 0, 
                                                0.28, 0, 2.6, 10.1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.33, 
                                                0.84, 0.59, 0.82, 0, 0.2, 0, 3.19, 10.11, 0, 0, 1.97, 0.99, 0, 
                                                0, 0, 0, 21.83, 0, 0, 21.83, 4.82, 3.92, 24, 14.41, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 24, 0, 0, 0, 0, 8.32, 0, 4.16, 0, 0.87, 0, 
                                                0, 0.29, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.52, 24, 0, 0, 8.35, 
                                                0, 9.12, 3.08, 0, 4.07, 0, 0, 18.38, 16.29, 11.56, 0, 20.43, 
                                                0.54, 15.99, 12.32, 0, 0, 16.08, 0, 5.36, 0, 0, 0, 0, 0, 0, 0, 
                                                24, 0, 0, 0, 1.45, 0, 0, 0, 0, 1.19, 4.78, 0, 24, 0, 0, 6, 0, 
                                                0.35, 0.53, 0, 24, 7.85, 5.82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0.02, 0.08, 0, 0, 3.57, 0, 0.89, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0, 0.65, 0, 0, 0, 0.49, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1.42, 0, 0, 1.42, 4.43, 0, 4.02, 
                                                9.56, 6.24, 1.49, 19.81, 0, 5.64, 8.98, 0, 0, 0, 0, 0, 1.07, 
                                                1.81, 6.12, 0.48, 3.4, 0, 0, 0, 0, 0, 1.09, 0, 0, 0, 1.09, 0, 
                                                7.94, 0, 3.32, 3.75, 24, 4.14, 0, 0, 0.11, 4.18, 0, 3.23, 19.52, 
                                                24, 0, 11.69, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4.81, 1.2, 0.1, 0, 
                                                13.73, 0, 0, 3.51, 0, 9.59, 1.28, 0, 0, 2.72, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0.25, 0, 0.29, 14.1, 0, 3.79, 0.74, 0.02, 
                                                0, 5.05, 2.43, 0.36, 23.73, 0, 0, 8.15, 10.26, 7.66, 7.41, 7.5, 
                                                12.01, 0, 0, 0, 0, 0, 0, 0, 0, 8.98, 8.26, 0.08, 0, 0, 16.1, 
                                                1.18, 4.38, 0, 0, 10.86, 0, 0, 2.71, 0.03, 0, 0, 2.92, 0, 0.76, 
                                                0.02, 14.59, 0, 0.3, 0.18, 3.78, 0, 0, 0, 0, 0, 0, 1.34, 0, 0.2, 
                                                0, 0, 1.39, 0.28, 0, 17.32, 0, 0, 4.54, 0, 0, 0, 0, 0.1, 0.03, 
                                                0, 0, 1.77, 0, 0, 0.44, 1.06, 3.13, 0, 0, 0.89, 2.07, 0, 0.13, 
                                                0, 0, 0, 0.03, 0, 0, 2.41, 3.28, 3.32, 2.25, 1.14, 0, 0, 0, 0, 
                                                1.14, 0, 0, 0, 0, 1.21, 0.3, 0.88, 0, 0, 0.93, 0, 1.11, 0, 0, 
                                                5.2, 1.41, 0.08, 1.67, 0, 0, 0, 0, 0, 0, 0, 0, 24, 24, 24, 24, 
                                                24, 0, 0, 0, 1.93, 2.54, 0, 0, 0, 0, 0, 3.68, 0.87, 0.87, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0.43, 0, 0.11, 0, 10.46, 0, 0, 0, 2.62, 
                                                0.07, 0, 0, 0, 3.77, 1.01, 0.02, 0, 0, 14.13, 0.42, 3.66, 0, 
                                                0.75, 0, 0, 0, 0.19, 0, 0, 11.09, 0, 0.57, 4.26, 0, 0, 0, 0, 
                                                0, 0, 0, 2.33, 0, 0, 0, 0.78, 0, 0, 0, 0, 0, 0, 0, 19.11, 0, 
                                                0.35, 0, 6.48, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3.2, 0, 0, 
                                                0, 0, 0, 0, 0.38, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6.61, 17.75, 
                                                24, 11.5, 24, 0, 0, 13.81, 1.43, 17.45, 5.02, 0, 0.46, 0, 0.41, 
                                                0, 19.07, 0.27, 0, 0, 0.5, 0.85, 0, 1.63, 0, 0, 5.73, 0, 0, 0, 
                                                0, 0, 3.8, 0, 0, 0, 0, 0, 5.67, 0.55, 0, 0, 0, 0, 0, 0, 0, 7.51, 
                                                0, 24, 0, 0, 0, 8.36, 0, 0, 0, 0, 0, 0, 0, 0.1, 0, 0, 0, 3.52, 
                                                0, 0, 0, 0, 18.49, 0, 0, 0, 0, 1.77, 0, 0, 0, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 0, 0, 0, 0.37, 1.75, 0, 0, 0, 0, 0.07, 0, 6.69, 0, 
                                                2.7, 0, 0, 12.02, 0, 0, 12.02, 0, 0, 13.22, 0.07, 15.37, 15.4, 
                                                0, 13.12, 0, 0, 13.96, 0, 2.02, 0, 0, 0, 0, 0, 0, 0, 1.73, 0, 
                                                0, 0.03, 0, 0, 0, 0, 0, 0, 0, 0.03, 0, 1.32, 0, 1.08, 1.02, 0, 
                                                0, 0, 1.67, 0.32, 0, 0, 14.48, 0, 24, 16.73, 0, 0, 0, 16.52, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 8.92, 2, 0, 0, 0, 0, 0, 8.92, 0, 0, 3.4, 0, 0.55, 
                                                0.01, 0, 0, 0, 3.49, 0, 0, 0, 0, 3.69, 14.98, 9.09, 13.36, 0, 
                                                0, 0, 7.54, 4.1, 0, 16.38, 0, 0, 0, 0, 0, 0, 0, 16.39, 0, 0.11, 
                                                0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                                                0, 0, 0, 0, 2.82, 0, 0, 0, 0, 0.73, 1.58), Type = c("6", "6", 
                                                                                                    "6", "A", "A", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", 
                                                                                                    "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", 
                                                                                                    "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "C", "C", "C", 
                                                                                                    "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", 
                                                                                                    "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", 
                                                                                                    "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", 
                                                                                                    "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", 
                                                                                                    "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", 
                                                                                                    "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", 
                                                                                                    "D", "D", "D", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", 
                                                                                                    "E", "E", "E", "E", "E", "E", "E", "E", "E", "E", "F", "F", "F", 
                                                                                                    "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", 
                                                                                                    "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", "F", 
                                                                                                    "F", "F", "F", "F", "F", "H", "I", "I", "I", "I", "I", "I", "I", 
                                                                                                    "I", "I", "I", "I", "I", "I", "I", "I", "I", "I", "I", "I", "I", 
                                                                                                    "I", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", 
                                                                                                    "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", 
                                                                                                    "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "L", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", 
                                                                                                    "M")), .Names = c("Workareabis", "score", "Type"), row.names = c(NA, 
                                                                                                                                                                     900L), class = "data.frame")

colnames(merge_file) <- c("Workareabis","score","Type")



# Choice vector
vector_areasbis <- unique(merge_file$Workareabis)

# We display the combobox

output$Area <- renderUI({ 
  selectInput("Area",
              h4("Choose Group(s) :",style = "color:blue"), 
              c("All",as.character((vector_areasbis))), multiple=TRUE,selected = "All")
}) # End of renderUI 


incProgress(1, detail = paste("Data available"))        

shinyjs::enable("Act")

}) # End of WithProgress bar definition + data extraction


# Linked event
observeEvent(input$Act,{

shinyjs::disable("Act")
shinyjs::enable("Act")

}) # END

# End shiny server
})

任何帮助将不胜感激

0 个答案:

没有答案