如何添加信息框&;在r中以fluidrow格式绘制到列的迷你图是否亮?

如何添加信息框&;在r中以fluidrow格式绘制到列的迷你图是否亮?,r,shiny,R,Shiny,我是shiny的新手,正在尝试在每个infobox下添加lineplots,如下图所示。但是问题是我无法向这一行添加(信息框+线条图)更多的项目 代码: fluidRow( column(2, selectInput(inputId = "id_country_timeline", label = "Select Country (applies on this page)",

我是shiny的新手,正在尝试在每个
infobox
下添加
lineplots
,如下图所示。但是问题是我无法向这一行添加(信息框+线条图)更多的项目

代码:

 
    fluidRow(
        
    
        column(2, selectInput(inputId = "id_country_timeline", label = "Select Country (applies on this page)", 
                              choices = unique(ts_all_long$Country.Region), selected = "India")),
        
        column(1, 
               infoBoxOutput("daily_confrm", width = NULL),
               plotOutput("ConfirmDaily_line_only", height = "40px", width = 80)),
        column(1,
               infoBoxOutput("daily_death", width = NULL),
               plotOutput("DeathDaily_line_only", height = "40px", width = 80)),
        column(1,
               infoBoxOutput("tot_confrm", width = NULL),
               plotOutput("Confirm_line_only", height = "40px", width = 80)),
        column(1,
               infoBoxOutput("tot_death", width = NULL),
               plotOutput("Death_line_only", height = "40px", width = 80))
        ,
        # column(1,
        #        infoBoxOutput("tot_death", width = NULL),
        #        plotOutput("Death_line_only", height = "40px", width = 80))
        # ,
        # column(2,
        #        infoBoxOutput("per_vaccinated", width = NULL),
        #        plotOutput("Death_line_only", height = "40px", width = 80)
        #        ),
        # div(style = "height:80px;")
        
    ),
当我取消注释时,即使下一列包含
信息框和绘图输出
,整个页面也会变为空白。我猜流体行可以有12个我没有充分利用的项目列,但有多少项目可以添加到该行的限制

当我将列大小从1增加到2时,它们确实分布在整行上


我不确定为什么我无法向其中添加更多此类项目。

出现问题,因为我多次使用相同的
id
。如果
id
只使用一次或它们是唯一的,那么它们似乎工作得很好