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

fix dt table width

Browse Source
This commit is contained in:
dylan
2026-04-06 01:36:00 -04:00
parent b61790e17b
commit 933fe72b01
2 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
app/server.R
+2
View File
@@ -24,6 +24,7 @@ server <- function(input, output, session) {
output$storm_coverage_table <- renderDT({ output$storm_coverage_table <- renderDT({
datatable( datatable(
storm_coverage, storm_coverage,
fillContainer = TRUE,
rownames = F, rownames = F,
escape = F, escape = F,
colnames = c("Year", "Name", "Data"), colnames = c("Year", "Name", "Data"),
@@ -440,6 +441,7 @@ server <- function(input, output, session) {
output$track_data <- renderDT({ output$track_data <- renderDT({
datatable( datatable(
fillContainer = TRUE,
storm_track() %>% storm_track() %>%
select( select(
formatted_datetime, formatted_datetime,
app/ui.R
+4 -3
View File
@@ -49,7 +49,9 @@ ui <- page_navbar(
layout_columns( layout_columns(
col_widths = c(8, 4), col_widths = c(8, 4),
card( card(
DTOutput("storm_coverage_table") card_body(
DTOutput("storm_coverage_table")
)
), ),
layout_columns( layout_columns(
col_widths = 12, col_widths = 12,
@@ -94,8 +96,7 @@ ui <- page_navbar(
), ),
card( card(
card_body( card_body(
class = "p-0", DTOutput("track_data", fill = TRUE)
DTOutput("track_data", height = "100%")
) )
) )
) )