add base damage input

This commit is contained in:
2025-07-10 21:54:57 -04:00
parent 6073b97bf6
commit 143dbb2c3d
+14 -71
View File
@@ -562,7 +562,17 @@ observe({
fillCol(
flex = c(.1, .45, .45),
sliderInput("growth_trend_map_slider", label = NULL, min = 1900, max = 2024, step = 1, animate = T, value = 1700, sep = "", width = "90%", ticks = F),
div(
style = "
padding-left: 15px;
padding-right: 15px;
padding-top: 15px;
display: flex;
justify-content: center;
align-itmes: center;
",
sliderInput("growth_trend_map_slider", label = NULL, min = 1900, max = 2024, step = 1, animate = T, value = 1700, sep = "", width = "100%", ticks = F)
),
leafletOutput("pop_growth_map"),
leafletOutput("housing_growth_map")
)
@@ -611,75 +621,6 @@ fillCol(
Storm Fatalities {data-navmenu="Storm Details"}
===
Storm Comparison {data-navmenu="Storm Details"}
===
Column {data-width=500}
---
### Storm One {data-height=550}
```{r}
# selected storm
# dygraph of normalization
fillCol(
flex = c(.2, .8),
fluidRow(
column(4,
selectInput("locked_storm_one_basin", NULL, choices = "AL")
),
column(4,
selectInput("locked_storm_one_year", NULL, choices = 2005)
),
column(4,
selectInput("locked_storm_one_name", NULL, choices = "KATRINA")
)
),
#dygraphOutput("cost_index_chart")
)
```
### Storm One Track {data-height=450 .no-padding}
```{r}
# hurdat track
#leafletOutput("track_map", height="100%")
```
Column {data-width=500}
---
### Storm Two {data-height=550}
```{r}
# selected storm
# dygraph of normalization
fillCol(
flex = c(.2, .8),
fluidRow(
column(3,
selectInput("locked_storm_two_basin", NULL, choices = "AL")
),
column(3,
selectInput("locked_storm_two_year", NULL, choices = 2005)
),
column(3,
selectInput("locked_storm_two_name", NULL, choices = "KATRINA")
),
column(3,
actionButton("select_storm_two", "Submit", class = "btn-primary")
)
),
#dygraphOutput("cost_index_chart")
)
```
### Storm Two Track {data-height=450}
```{r}
# hurdat track
```
Fatalities {data-navmenu="Fatalities"}
===
@@ -779,7 +720,7 @@ billboarderOutput("aggregate_fatalities")
```
Impact Analysis {data-navmenu="Compute"}
Normalization Calculator {data-navmenu="Compute"}
===
Column {data-width=700 .tabset}
@@ -869,6 +810,8 @@ fillCol(
)
),
textInput("impact_base_damage", placeholder = "Storm Base Damage", label = NULL, width = "100%"),
actionButton("impact_calculate", label = "Calculate", width = "100%", class = "btn-primary rounded")
)
)