mirror of
https://github.com/dylanbenzi/hurricane_normalization_app.git
synced 2026-07-30 05:08:57 +00:00
fix dt table width
This commit is contained in:
@@ -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,
|
||||||
|
|||||||
@@ -49,7 +49,9 @@ ui <- page_navbar(
|
|||||||
layout_columns(
|
layout_columns(
|
||||||
col_widths = c(8, 4),
|
col_widths = c(8, 4),
|
||||||
card(
|
card(
|
||||||
|
card_body(
|
||||||
DTOutput("storm_coverage_table")
|
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%")
|
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
|
|||||||
Reference in New Issue
Block a user