html rmarkdown 中的 Kable 列寬

Question

我想在 html rmarkdown 中顯示一個寬的kable表，以顯示第一列有沒有任何換行符的長文本。 當我使用column_spec設置第一列的寬度時，它似乎對生成的 html 表沒有任何影響。 這是我的代碼。 有沒有辦法讓第一列沒有任何換行符？ 謝謝！

df <- data.frame(v1 = c('Long text without line breaks', 'Long text without line breaks', 'Long text without line breaks'),
                 v2 = c('text', 'text', 'text'),
                 v3 = c('text', 'text', 'text'),
                 v4 = c('text', 'text', 'text'),
                 v5 = c('text', 'text', 'text'),
                 v6 = c('text', 'text', 'text'),
                 v7 = c('text', 'text', 'text'),
                 v8 = c('text', 'text', 'text'),
                 v9 = c('text', 'text', 'text'),
                 v10 = c('text', 'text', 'text'),
                 v11 = c('text', 'text', 'text'),
                 v12 = c('text', 'text', 'text'),
                 v13 = c('text', 'text', 'text'),
                 v14 = c('text', 'text', 'text'),
                 v15 = c('text', 'text', 'text'),
                 v16 = c('text', 'text', 'text'),
                 v17 = c('text', 'text', 'text'),
                 v18 = c('text', 'text', 'text'),
                 v19 = c('text', 'text', 'text')
                 )

gctbl <- kable(df, col.names = colnames(df), escape = F) %>%
  kable_styling(full_width = T) %>%
  column_spec(1, width = '10in')
  
gctbl

Answer 1

您需要在column_spec中設置width_min 。 我認為3in對於示例中的第 1 列已經足夠了。

如果出於某種原因你真的需要10in ，你可以添加scroll_box()來啟用表格中的 x 軸滾動（不包括在我的回答中）。

kable(df, col.names = colnames(df), escape = F) %>%
  kable_styling(full_width = T) %>%
  column_spec(1, width_min = '3in')