我在闪亮的仪表板上使用了几个项目(使用flexdashboard,shinyjs和shineWidgets),每当我尝试从浏览器大小扩展到平板电脑或手机屏幕大小时,这些项目都会变得模糊不清。这仅发生在使用renderUI()函数实例化的项目上。如果简单地声明它们并且#34;不活跃"则相同的对象显示正常。这不是以下下拉列表示例所特有的,但在以类似方式呈现HTML()输出时也会发生。
例如,如果立即声明,则以下shinyWidget下拉按钮将完全缩放。换句话说,它在屏幕上显示为适当的高度。
dropdownButton(
p(strong("Append to API request")),
circle = FALSE,
status = "danger",
label = " Toggle",
icon = icon("transfer", lib = "glyphicon"),
width = "200px"
)
然而,这并没有,并且后续的面板变得模糊,在浏览器大小下面没有过多的填充。
uiOutput('sample_dropdown')
output$sample_dropdown <- renderUI(dropdownButton(
circle = FALSE,
status = "danger",
label = " Resample",
icon = icon("record", lib = "glyphicon"),
width = "200px"
))