mirror of
https://github.com/dylanbenzi/hurricane_normalization_app.git
synced 2026-07-30 05:08:57 +00:00
add ui buttons for cost index chart
This commit is contained in:
+7
-13
@@ -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,
|
|
||||||
# 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")
|
||||||
|
)
|
||||||
)
|
)
|
||||||
```
|
```
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user