dylan/hurricane_normalization_app
1
0
Fork 0
mirror of https://github.com/dylanbenzi/hurricane_normalization_app.git synced 2026-07-30 05:08:57 +00:00
Code Issues Packages Projects Releases Wiki Activity

modify storm selector selected storm info

Browse Source
This commit is contained in:
dylan
2026-04-07 21:41:00 -04:00
parent 3d87a5b07d
commit d365036eb9
2 changed files with 91 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files
app/ui.R
+46 -10
View File
@@ -56,22 +56,58 @@ ui <- page_navbar(
layout_columns(
col_widths = 12,
card(
height = 250,
h4(strong(textOutput("dt_storm_name_year"))),
p("Category X - Landfall: FL"),
div(),
hr(),
height = 300,
div(
h5(strong(textOutput("dt_storm_name_year"))),
uiOutput("dt_storm_badges")
),
layout_columns(
col_widths = c(6, 6),
div(),
div(),
div(),
div()
card(
class = "bg-light",
card_body(
class = "p-1",
div(
div(tags$small(class = "text-muted", "MMH23 Loss")),
#div(textOutput("dt_mmh_loss"))
)
)
),
card(
class = "bg-light",
card_body(
class = "p-1",
div(
div(tags$small(class = "text-muted", "Direct Deaths")),
div("hi")
)
)
),
card(
class = "bg-light",
card_body(
class = "p-1",
div(
div(tags$small(class = "text-muted", "Max Category")),
div("hi")
)
)
),
card(
class = "bg-light",
card_body(
class = "p-1",
div(
div(tags$small(class = "text-muted", "Track Observations")),
div("hi")
)
)
)
),
actionButton("load_storm", "Load Storm")
),
card(
height = 750,
height = 700,
card_body(
class = "p-0",
leafletOutput("all_storms_map", height = "100%")