update storm selector ui

This commit is contained in:
2025-07-14 16:18:34 -04:00
parent 828973121d
commit 2eb18de260
+13 -8
View File
@@ -199,18 +199,23 @@ Col {data-width=500}
#h6("Use either the select inputs or the data table below") #h6("Use either the select inputs or the data table below")
fluidRow( fluidRow(
column(4, column(6,
selectInput("stormBasin", "Select Basin", choices = "AL") div(
selectInput("stormBasin", "Basin", choices = "AL", width = "100%"),
selectInput("stormYear", "Year", choices = loss_storms$storm_year, width = "100%"),
selectInput("stormName", "Name", choices = NULL, width = "100%"),
actionButton("selectStorm", "Submit", class = "btn-primary rounded", width = "100%")
)
), ),
column(4, column(6,
selectInput("stormYear", "Select Year", choices = loss_storms$storm_year) HTML('
), <h5>Select a Storm</h5>
column(4,
selectInput("stormName", "Select Storm", choices = NULL) We are currently tracking 201 CONUS storms with over $3.6T in losses spanning from 1900 to 2024
')
) )
) )
actionButton("selectStorm", "Submit", class = "btn-primary")
observeEvent(input$stormYear, { observeEvent(input$stormYear, {