如何在 pdf 输出中有部分斜体列？

Question

此问题与

相关

我想在 kable 中使用部分斜体的单元格。我试过了

library(tidyverse); library(kableExtra)

sum_dat_final2 <- list(Site = c("Hanauma Bay", "Hanauma Bay", "Hanauma Bay", "Waikiki", "Waikiki", "Waikiki"), 
                   Coral_taxon = expression( italic(Montipora)~ spp., 
                                             italic(Pocillopora)~spp., 
                                             italic(Porites)~spp., 
                                             italic(Montipora)~ spp.,  
                                             italic(Pocillopora)~spp.,  
                                             italic(Porites)~spp.))

sum_dat_final2 %>%
  as.data.frame()%>%
  kbl(longtable = F, "latex")

并收到此错误 Error in as.data.frame.default(x[[i]], optional = TRUE) : cannot coerce class ‘"expression"’ to a data.frame

非常感谢！！

Answer 1

您可以通过添加 $ 将特定部分设为斜体。从这个意义上讲，您需要在 kbl 函数上设置 escape = F。

```{r}
library(tidyverse); library(kableExtra)

sum_dat_final2 <- list(Site = c("Hanauma Bay", "Hanauma Bay", "Hanauma Bay", "Waikiki", "Waikiki", "Waikiki"), 
                   "Coral_taxon" = c("$Montipora$$~$ spp.",
                                   "$Pocillopora$$~$spp.",
                                   "$Porites$$~$spp.",
                                   "$Montipora$$~$ spp.",
                                   "$Pocillopora$$~$spp.",
                                   "$Porites$$~$spp."))

sum_dat_final2 %>%
  as.data.frame()%>%
  kbl(longtable = F, "latex", 
      escape = F,
      col.names = c("Site", "Coral taxonomie"))
```

--输出

如何在 pdf 输出中有部分斜体列？

How to have partially italicized columns in pdf output?

pdf

kable

kableextra