สร้างคอลัมน์ภายในคำจำกัดความของ UI
column ( width , ... , offset = 0 )
width
ความกว้างของตารางของคอลัมน์ (ต้องอยู่ระหว่าง 1 ถึง 12)
... องค์ประกอบที่จะรวมอยู่ในคอลัมน์
offset จำนวนคอลัมน์ที่จะชดเชยคอลัมน์นี้จากส่วนท้ายของคอลัมน์ก่อนหน้า
ประเมินค่า
คอลัมน์ที่สามารถรวมอยู่ใน fluidRow หรือ fixedRow
ลักษณะ
สร้างคอลัมน์สำหรับใช้ภายใน fluidRow หรือ fixedRowตัวอย่าง
## เรียกใช้ตัวอย่างใน interactive R sessions
if (interactive()) {
# ตัวอย่าง UI กับ fluidPage
ui <- fluidPage(
# ชื่อแอ็พพลิเคชัน
titlePanel("Hello Shiny!"),
sidebarLayout(
# แถบด้านข้างที่มีการป้อนข้อมูลแถบเลื่อน
sidebarPanel(
sliderInput("obs",
"Number of observations:",
min = 0,
max = 1000,
value = 500)
),
# แสดงพล็อตการแจกจ่ายที่สร้างขึ้น
mainPanel(
plotOutput("distPlot")
)
)
)
# ตรรกะของเซิร์ฟเวอร์
server <- function(input, output) {
output$distPlot <- renderPlot({
hist(rnorm(input$obs))
})
}
# แอปที่สมบูรณ์พร้อม UI และส่วนประกอบเซิร์ฟเวอร์
shinyApp(ui, server)
# UI แสดงรูปแบบคอลัมน์
ui <- fluidPage(
title = "Hello Shiny!",
fluidRow(
column(width = 4,
"4"
),
column(width = 3, offset = 2,
"3 offset 2"
)
)
)
shinyApp(ui, server = function(input, output) { })
}
american roulette table - ChoGraCasino 카지노사이트 카지노사이트 fun88 fun88 bet365 bet365 505Royal Ace Casino Free Spin Bonus Codes 2021
ตอบลบ