我正在尝试更改 R Shiny 中 sidebarPanel 的宽度,以便我的 mainPanel 有更多“空间”来并排显示两个图表。这些图表显示在主面板中各自的侧边栏面板中。因此,存在三个侧边栏面板:第一个用于数据选择/选择在其余两个侧边栏面板中显示。
但是,当我更改第一个 sidebarPanel 的宽度时,所有 sidebarPanel 都采用此宽度。我该如何防止这种情况发生?
我用作示例的 ui.r 代码位于:https://github.com/EconometricsBySimulation/2013-06-11-Shiny-Exploration/blob/master/ui.R
server.r 代码示例位于:https://github.com/EconometricsBySimulation/2013-06-11-Shiny-Exploration/blob/master/server.R
我使用以下内容来调整 ui.r 中第一个 sidebarPanel 的宽度:
left=sidebarPanel(
tags$head(
tags$style(type="text/css", "select { width: 100px; }"), # defines width of dropdown panel
tags$style(type='text/css', ".span4 { max-width: 150px; }") # defines width of panel containing dropdown panel
),
但正如所指出的,这会导致后续面板呈现其宽度。
关于如何保持第一个侧边栏面板的宽度或更窄的设置,并使第二个(中间)和第三个(右侧)侧边栏面板的宽度各为剩余空间宽度的一半,有什么想法吗?
提前谢谢了!
Using sidebarPanel
在我看来有点扭曲wellPanel
可能是一个更好的选择。请尝试以下操作:
left=wellPanel(
tags$style(type="text/css", '#leftPanel { width:200px; float:left;}'),
id = "leftPanel",
selectInput .... as before
这为面板提供了一个 ID 并指定为样式。对其他面板执行类似的操作。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)