Error in tag(“div”, list(…)) : argument is missing, with no default

Published by onesixx on

shiny에서 … Check the UI Comma

line29 마지막의 Comma 를 삭제해야함.

# # load_ui -----------------------------------------------------------------
tabItem(tabName="loadTab", class="active",
  fluidRow(
    #` > side ----
    column(width=3,
      box(title="Load Data", width=NULL, collapsible=T
      )
    ),   
    
    # ` > main ----
    tabBox(width=9, title="Info", id="tabLoad", 
      tabPanel(title="Plot",
        plotOutput(outputId="mainplot", width="100%",       
                    brush = brushOpts(id="mainplot_brush",direction = "x", fill = "#ccc"),
                    dblclick = dblclickOpts(id = "mainplot_dbclick"),
                    hover = hoverOpts(id = "mainplot_hover", delay = 0, nullOutside = TRUE)
        ), #%>% withCustomSpinner()
        uiOutput(outputId = "mainplot_ToolTip"),
        sliderInput(inputId="mainplot_dateRange", label="Date Range",  width="100%"),
        fluidRow(
          column(6),
          column(3),
          column(3,
            actionButton(inputId="refreshPlot", "Refresh plot", width="100%") %>% withBusyIndicatorUI(),
            fluidRow(
              column(width = 1, offset = 10, style = "padding: 0;",
                withBusyIndicatorUI(actionButton(inputId = "heightPluse", label = NULL, icon = icon("plus")))),
              column(width = 1, style = "padding: 0;",
                withBusyIndicatorUI(actionButton(inputId = "heightMinus", label = NULL, icon = icon("minus"))))),
          )
        ) 
      )
    )
  )
)","wrapLines":false,"highlightStart":"29","highlightEnd":"29
Categories: R-Shiny

onesixx

Blog Owner

Subscribe
Notify of
guest

0 Comments
Oldest
Newest Most Voted
Inline Feedbacks
View all comments
0
Would love your thoughts, please comment.x
()
x