我正在尝试构建一个小型仪表板应用程序,我需要使用amfunnel of ramcharts绘制漏斗图。请参阅以下代码和屏幕截图。
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")
})
我希望漏斗能够填充容器/盒子。我尝试增加框宽,但这会覆盖/限制页面中的其他框。如何增加漏斗的宽度,使其填满整个盒子。