1
讓我們假設我有一個非常簡單的應用程序,只有8個輸入分組在2個面板(4輸入| 4輸入 - 見圖片波紋管),並基於這些,我繪製一個小圖(容易peasy )。閃亮:標籤位置,文本輸入
,我所面臨的問題是,我想有標籤只提供給第一面板,並在textInput
框的左側。
例如(請原諒我的草率的圖像編輯!)
什麼建議嗎?
我對圖1輸出MWE:
library(shiny)
ui<-shinyUI(fluidPage(
wellPanel(
tags$style(type="text/css", '#leftPanel { max-width:300px; float:left;}'),
id = "leftPanel",
textInput("Population1000", 'Population 1000',"15"),
textInput("Area1000",'Area 1000', "20"),
textInput("GNI1000", 'GNI 1000', "2314"),
textInput("GDP1000", "GDP 1000", "1000")
),
wellPanel(
tags$style(type="text/css", '#RightPanel { max-width:300px; float:left;}'),
id = "RightPanel",
textInput("Population2000", 'Population 2000',"15"),
textInput("Area2000",'Area 2000', "20"),
textInput("GNI2000", 'GNI 2000', "2314"),
textInput("GDP2000", "GDP 2000", "1000")
)
)
)
server<-shinyServer(function(input, output) {NULL})
shinyApp(ui,server)
嗨@Victorp,這確實是一個非常好的解決方案,但它不能解決我的問題,因爲我無法在面板中對條目進行分組 - 或類似的東西。基本上,每列應該代表一年(例如1000,2000),因此應該有區分列的方法(例如標題)。 (對不起,我不會在圖片中使它更清晰,我會做出更改) –
最簡單的方法是在第一個輸入中放置一個標籤,並在左側的標籤中添加換行符。查看編輯 – Victorp
精彩的,測試它,它的工作方式非常好。 –