更多输入类型
案例研究：使用 R 的 Shiny 构建 Web 应用
Dean Attali
Shiny Consultant
Gapminder 作图应用
滑块输入
sliderInput("slider", "Choose a number",
value = 15, min = 5, max = 20)
sliderInput("slider2", "Choose a number",
value = c(10, 15), min = 5, max = 20)
str(input$slider2)
num [1:2] 10 15
单选按钮
radioButtons("radio", "Choose your favorite time of day",
choices = c("Morning", "Afternoon", "Evening"),
selected = "Afternoon")
选择输入（下拉）
selectInput("select", "Choose your favorite time of day",
choices = c("Morning", "Afternoon", "Evening"),
selected = "Afternoon")
选择输入（下拉）
selectInput("select", "Choose your favorite time of day",
choices = c("Morning", "Afternoon", "Evening"),
selected = "Afternoon")
选择输入（下拉）
selectInput("select", "Choose your favorite time of day",
choices = c("Morning", "Afternoon", "Evening"),
selected = "Afternoon")
选择输入（下拉）
- 允许多选
selectInput("select", "Choose your favorite time of day",
choices = c("Morning", "Afternoon", "Evening"),
selected = c("Afternoon", "Evening"),
multiple = TRUE)
单选按钮 vs 选择输入
