R flexdashboard progressBar的调整

Question

大家好，

我想调整进度条的大小，如下所示：

我希望它们的高度和宽度更厚。

过去几个小时我用谷歌搜索，似乎找不到特定于 R 中的 flexdashboard 的解决方案。

这是我的代码：

# Progressbar UI
    progressBar(id = "test", value = Pre_treat_done, total = Pre_treat_total, display_pct = T, title =   df_new$WORK_NO[1], status = "warning")
    
    
updateProgressBar(session = session, id = "test", value = Pre_treat_done, status = "warning")

我尝试了以下方法

添加了标签$风格定制

tags$head(
      tags$style(
        HTML('
        #test {height: 100px;
              width: 800px;
              position:fixed;}
        ')))

这不符合预期。我想知道是否需要使用 CSS 进行此自定义，如果有任何建议，我将不胜感激。提前致谢！

Answer 1

我通过在现有代码中包含以下行设法解决了这个问题：

fluidPage()

结果是：

R flexdashboard progressBar的调整

Adjustment of progressBar on R flexdashboard

r

shiny

dashboard