huxtable表的单元格内的换行符

Question

我最近开始对表使用huxtable R包，这让我印象深刻。但是，我似乎无法弄清楚的一件事是如何在单元格中获得换行符。这是我尝试过的

library(tidyverse)
library(huxtable)
cars <- mtcars %>% 
  mutate(car = rownames(.),
         car = str_replace(car, " ", "\n")) %>% 
  slice(1:5) %>% 
  select(car, cyl, hp)

cars

# A tibble: 5 x 3
  car                    cyl    hp
  <chr>                <dbl> <dbl>
1 "Mazda\nRX4"          6.00 110  
2 "Mazda\nRX4 Wag"      6.00 110  
3 "Datsun\n710"         4.00  93.0
4 "Hornet\n4 Drive"     6.00 110  
5 "Hornet\nSportabout"  8.00 175 

ht <- as_hux(cars, add_colnames = TRUE)
escape_contents(ht) <- TRUE
ht

但这最终没有换行，如下面的屏幕截图所示

该escape_contents部分似乎没有什么不同。

我不确定自己想要的东西是否可行，但是我知道它在其他软件包中（例如DT::datatable）。如果可能的话，我真的很想使用huxtable，因为我喜欢软件包的设计和灵活性。

任何想法都会很棒。

编辑：我应该已经指定了我希望能使它适用于PDF。

Answer 1

根据Escaping HTML or LaTeX，您应该使用escape_contents(ht) <- FALSE并使用<br>标签而不是\n

library(tidyverse)
library(huxtable)
cars <- mtcars %>% mutate(car = rownames(.),
                          car = str_replace(car, " ", "<br>")) %>% 
                   slice(1:5) %>% select(car, cyl, hp)

 ht <- as_hux(cars, add_colnames = TRUE)
 escape_contents(ht) <- FALSE
 ht

请注意，输出是 Rmarkdown 文档，感谢您提供包信息。看上去不错。以下是我的输出