add ui buttons for cost index chart

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