kable()의 테이블에서 이름을 어떻게 첨자화할 수 있습니까?

Question

data.frame A가 주어지면 아래 첨자 된 행과 열 이름을 어떻게 사용할 수 있습니까? 결국 나는 rmarkdown (출력 : 워드 문서)에서 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을 사용할 때 테이블의 모든 텍스트는 태그 다운 구문으로 인식됩니다. 따라서 귀하의 rmarkdown 코드는 다음과 같아야합니다 :

```{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) 
```