孔面板的发光高度无法适应内容

问题描述

我在有光泽的应用程序的操作面板中使用了条件面板。可悲的是，孔面板的高度无法适应条件面板。我的代码如下：

library(shiny)

supp_distr_names <- c("Normal","Uniform")

ui <- fluidPage(fluidRow(fluidRow(
  wellPanel(
    selectInput("distribution","Select distribution:",choices = supp_distr_names),conditionalPanel(
      condition = "input.distribution == 'Normal'",column(width = 6,numericInput("normal_mean","Mean:",value = 0)),numericInput("normal_var","Variance:",value = 0))
    ),conditionalPanel(condition = "input.distribution == 'Uniform'",)
  )
)))

server <- function(input,output,session) {
}

shinyApp(ui,server)

是否可以调整wellPanel的高度？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）