給予標題到另一側地塊的閃亮與Fluidrow

Question

如何給冠軍閃亮的兩個側地塊，我試圖做這樣的事情之後，這肯定是給我錯誤

shinyUI(
titlePanel("Hello Shiny!"), 
mainPanel(
fluidRow(
splitLayout(cellWidth(50%,50%), 
    tableOutput("Table1", tags$b("Title1")), 
    plotOutput("Plot",tags$b("Title2))))) 

Answer 1

這裏是解決方案你：

library(shiny) 

     ui <- basicPage(
    fluidRow(
    column(6,box("Title 1",tableOutput("Table1"))), 
    column(6,box("Title 2",plotOutput("Plot"))))) 

server <- function(input, output) { 
} 

shinyApp(ui, server) 

這是不夠的，如果你之前..output(..)

在column容器鍵入的文本我提高了通過更換位代碼column到容器，除法/拆分ui成兩個，相同尺寸的容器（column(6) = 50％）和另外的box()，所以你的outputs被保持在那裏和標題將被附加到它（到box）