如何從kable（）中的表中標記名稱？

Question

給定一個data.frame A，如何使用下標的行和列名稱？最終我想通過在rmarkdown（輸出：word文檔）中的kable（）生成表格。

A <- data.frame(round(replicate(3, runif(2)),2)) 
rownames(A) <- c("Hola123", "Hola234") 
A 

      X1 X2 X3 
Hola123 0.47 0.55 0.66 
Hola234 0.89 0.45 0.20 

如何通過kable（A）創建表時使行和列名稱中的所有數字都下標？

我曾嘗試：

rownames(A) <- c(expression(Hola["123"]), expression(Hola["234"])) 
names(A) <- c(expression(X["1"]), expression(X["2"]), expression(X["3"])) 

但是，創造穿過.rmd文件kable（）表時它不出現下標。

Answer 1

要在rmarkdown文檔中添加下標，您可以在兩個代字號之間嵌入文字：text~sub~。 使用功能kable時，表格中的任何文本都被識別爲降格語法。因此，您的降價代碼應該是：

```{r} 
A <- data.frame(round(replicate(3, runif(2)),2)) 
rownames(A) <- c("Hola~123~", "Hola~234~") 
names(A) <- c("X~1~", "X~2~", "X~3~") 
knitr::kable(A) 
```