.dev_triangle_diag_main <- shiny::mainPanel(
shiny::fluidRow(
shiny::column(width=6, shiny::plotOutput("diag_year")),
shiny::column(width=6, shiny::plotOutput("diag_cal_year"))),
shiny::fluidRow(
shiny::column(width=6, shiny::plotOutput("diag_value")),
shiny::column(width=6, shiny::plotOutput("diag_dev_month"))))
В вышеприведенном фрагменте, где бы ни находился «глянцевый :: plotOutput», он имел обыкновение быть «plotly :: plotlyOutput».
Это работало, как и ожидалось, когда было «plotly :: plotlyOutput», но после переключения на «глянцевый :: plotOutput» страница стала пустой.