ประเภท input เพิ่มเติม

กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R

Dean Attali

Shiny Consultant

แอป Gapminder plot

chapter2_3_more_input_types.003.png

Slider inputs

sliderInput("slider", "Choose a number",
            value = 15, min = 5, max = 20)

chapter2_3_more_input_types.004.png

sliderInput("slider2", "Choose a number",
            value = c(10, 15), min = 5, max = 20)

chapter2_3_more_input_types.006_b.png

str(input$slider2)

num [1:2] 10 15

Radio buttons

radioButtons("radio", "Choose your favorite time of day",
             choices = c("Morning", "Afternoon", "Evening"),
             selected = "Afternoon")

chapter2_3_more_input_types.009.png

Select inputs (dropdowns)

selectInput("select", "Choose your favorite time of day",
            choices = c("Morning", "Afternoon", "Evening"),
            selected = "Afternoon")

chapter2_3_more_input_types.013.png

Select inputs (dropdowns)

selectInput("select", "Choose your favorite time of day",
            choices = c("Morning", "Afternoon", "Evening"),
            selected = "Afternoon")

chapter2_3_more_input_types.014.png

Select inputs (dropdowns)

selectInput("select", "Choose your favorite time of day",
            choices = c("Morning", "Afternoon", "Evening"),
            selected = "Afternoon")

chapter2_3_more_input_types.015.png

Select inputs (dropdowns)

รองรับการเลือกหลายรายการ

selectInput("select", "Choose your favorite time of day",
            choices = c("Morning", "Afternoon", "Evening"),
            selected = c("Afternoon", "Evening"),
            multiple = TRUE)

chapter2_3_more_input_types.016.png

Radio buttons vs Select inputs

Radio buttons
- ตัวเลือกน้อย
- มองเห็นทุกตัวเลือก
- เลือกได้ครั้งละหนึ่งตัวเลือก
Select inputs
- ตัวเลือกน้อยหรือมากก็ได้
- มองเห็นตัวเลือกทั้งหมดได้ยากกว่า
- เลือกได้หลายตัวเลือก

chapter2_3_more_input_types.018.png

มาฝึกกันเถอะ!

กรณีศึกษา: การสร้างเว็บแอปพลิเคชันด้วย Shiny ใน R