pander와 CrossTable을 사용하여 열 및 행 백분율이있는 테이블?

Question

knitr 및 pander로 보고서를 생성하려고합니다. 테이블에 행 또는 열 비율을 표시하려면 CrossTable() 함수를 사용하고 카이 제곱 값과 테이블 합계 값을 제거하고 싶습니다. 여기

은 예입니다

```{r} 
x <- c(1,1,2,2) 

y <- c(1,2,1,2) 

CrossTable(x, y, prop.chisq=FALSE, prop.t = FALSE) 

작품을 아주 잘하지만 오류 메시지에서

pander(descr::CrossTable(x, y, prop.chisq=FALSE, prop.t = FALSE), split.table = Inf) 
    ``` 

결과 : 만 된 로우와 테이블을 생성 할 수있는 방법

Quitting from lines 45-78 (test.Rmd) Fehler in apply(x$prop.tbl, c(1, 2), to.percent): dim(X) must have a positive length Calls: ... eval -> eval -> pander -> pander.CrossTable -> apply 

pander 및 CrossTable을 사용하는 열의 퍼센트는?

종류에 관해서, 말러는

Answer 1

이것은 recent commit으로 pander의 development version 고정되었습니다

이것은 [이 티켓 (관련된

> pander(descr::CrossTable(x, y, prop.chisq=FALSE, prop.t = FALSE), split.table = Inf) 

------------------------------------ 
   1  2  Total 
--------- -------- -------- -------- 
**1**\  \  \  \ 
    N\  1\  1\  2\  
Row(%)\ 50%\  50%\  50% 
Column(%) 50%  50%    

**2**\  \  \  \ 
    N\  1\  1\  2\  
Row(%)\ 50%\  50%\  50% 
Column(%) 50%  50%    

    Total  2\  2\  4\ 
      50%  50%    
------------------------------------