add ui buttons for cost index chart

This commit is contained in:
2025-07-14 16:29:20 -04:00
parent 2eb18de260
commit b341d9ad45
+6 -12
View File
@@ -415,22 +415,16 @@ output$cost_index_chart <- renderDygraph({
# TODO: add button to select normalized costs # TODO: add button to select normalized costs
#}) #})
fillCol(
flex = c(.2, .8),
fluidRow( fluidRow(
column(4, style = "height: 100%",
selectInput("storm_overview_cost_index_lf", "Landfall Select", choices = NULL) column(3,
), selectInput("storm_overview_cost_index_lf", "Landfall", choices = NULL),
column(4, radioGroupButtons("storm_overview_cost_index_value", label = "Value", choices = c("Index", "Loss"), status = "outline-primary rounded-0", justified = T)
# TODO: add button to select normalized costs
#checkboxInput("storm_overview_select_base", "Include Normalized Losses", value = F)
),
column(4,
#checkboxInput("mmpSelect", "Display MMP", value = T)
)
), ),
column(9,
dygraphOutput("cost_index_chart") dygraphOutput("cost_index_chart")
) )
)
``` ```
### Landfalls {data-height=500 .no-padding} ### Landfalls {data-height=500 .no-padding}