无法在闪亮的仪表板中增加 amfunnel 图表的宽度

Question

我正在尝试构建一个小型仪表板应用程序，我需要在其中使用 ramcharts 的 amfunnel 绘制漏斗图。请看下面的代码和截图。

body <- dashboardBody(
  tags$style(type = "text/css", "#map {height: calc(100vh - 80px) !important;}"),
  fluidRow(
    box(
      title = "Box title", width = 6, status = "primary",
      amChartsOutput(outputId = "amfunnel",width = "100%")
    ),
    box(
      status = "warning", width = 4,
      "Box content"
    ),
    box(
      status = "warning", width = 2, 
      "Box Content"
    )

  )
)  
server <- function(input, output) {
  output$amfunnel <-  renderAmCharts({
    amFunnel(data = data_funnel, inverse = FALSE, label_side = "left")
  })

Output dashboard

我想让漏斗填满 container/box。我尝试增加框的宽度，但这是 overlaying/restricting 页面中的其他框。如何增加漏斗的宽度，使其填满整个框。

Answer 1

参考amFunnel的文档后，您只需使用边距参数即可：

amFunnel(data = data_funnel, inverse = FALSE, margin_right = 0, label_side = 'left')

无法在闪亮的仪表板中增加 amfunnel 图表的宽度

Unable to increase the width of amfunnel chart in shiny dashboard

r

amcharts

shiny

shinydashboard