在kable表格列中包裝長文本

Question

我想在我的kable表格中包裝長文本。以下是列表文本的一個簡單示例，其中列文本太長，需要將表格打包以適合頁面。

--- 
title: "test" 
output: pdf_document 
--- 

```{r setup, include=FALSE} 
    library(knitr) 
``` 


This is my test 

```{r test, echo=FALSE} 
test <- data.frame(v1=c("This is a long string. This is a long string. This is a long string. This is a long string. This is a long string.", 
         "This is a another long string. This is a another long string. This is a another long string. This is a another long string. This is a another long string."), 
        v2=c(1, 2)) 
kable(test) 
``` 

Answer 1

我創建了pander包產生以靈活的方式降價表。默認情況下，它將用長字符串拆分單元格爲30個字符，但有一堆global options和fn參數可以覆蓋它們，啓用連字符和其他調整。快速演示：

> pander::pander(test) 

----------------------------------- 
       v1    v2 
------------------------------ ---- 
This is a long string. This is 1 
a long string. This is a long  
string. This is a long string.  
    This is a long string.   

This is a another long string. 2 
This is a another long string.  
This is a another long string.  
This is a another long string.  
This is a another long string.  
----------------------------------- 

> pander::pander(test, split.cell = 80, split.table = Inf) 

------------------------------------------------------------------------------------ 
             v1           v2 
------------------------------------------------------------------------------- ---- 
This is a long string. This is a long string. This is a long string. This is a 1 
         long string. This is a long string.       

This is a another long string. This is a another long string. This is a another 2 
    long string. This is a another long string. This is a another long string.   
------------------------------------------------------------------------------------ 

Answer 2

的替代比真棒pander包中的其它的解決方案是在kableExtra使用column_spec。在這種情況下，下面的代碼可以做到這一點。

kable(test, "latex") %>% 
    column_spec(1, width = "10em")