table width to page instead of content
This commit is contained in:
parent
3fe1cf8638
commit
86460aa189
|
|
@ -969,9 +969,13 @@ field_details_clean <- field_details_table %>%
|
||||||
|
|
||||||
|
|
||||||
# Display the cleaned field table with flextable
|
# Display the cleaned field table with flextable
|
||||||
|
# Set column widths to fit page (approximately 6.5 inches for 1-inch margins)
|
||||||
|
col_widths <- c(1.2, 0.9, 1.0, 1.0, 0.8, 0.9, 0.8, 0.7, 0.6) # inches for each column
|
||||||
|
|
||||||
ft <- flextable(field_details_clean) %>%
|
ft <- flextable(field_details_clean) %>%
|
||||||
set_caption("Detailed Field Performance Summary") %>%
|
set_caption("Detailed Field Performance Summary") %>%
|
||||||
autofit()
|
width(width = col_widths) %>%
|
||||||
|
autofit(add_w = 0, add_h = 0)
|
||||||
|
|
||||||
ft
|
ft
|
||||||
```
|
```
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue