外星人目击：添加输入控件
National UFO Reporting Center（NUFORC）在过去的一个世纪中收集了目击数据。这个应用将允许用户选择一个美国州和目击发生的时间段。
请记住，添加后，输入控件应与下图效果一致，尽管它们还不会出现在侧边栏中：
usa_ufo_sightings 数据集以及 shiny、ggplot2 和 dplyr 包都已为您加载。
本练习是课程的一部分
使用 R 构建 Shiny Web 应用
练习说明
- 为应用添加标题。
- 在侧边栏添加一个输入控件，让用户从 50 个美国州中选择一个。
- 在侧边栏添加一个输入控件，让用户选择一个日期范围。可自由设置任意
start或end日期。
交互式实操练习
通过完成这段示例代码来试试这个练习。
ui <- fluidPage(
# CODE BELOW: Add a title
sidebarLayout(
sidebarPanel(
# CODE BELOW: One input to select a U.S. state
# And one input to select a range of dates
),
mainPanel()
)
)
server <- function(input, output) {
}
shinyApp(ui, server)