Rmarkdownの双方向周波数テーブル

Question

どのようにRmarkdownで双方向周波数テーブルを作成できますか？以下のような 何か：

私はknitrパッケージからKABLE機能とDTパッケージからdatable機能の両方を使用しようとしましたが、どれも私に望ましい結果は得られませんでした。

更新：例と 再現コード。

a <- sample(x = c(1,2,3), size = 1000, replace = T) 
b <- sample(x = c('a', 'b', 'c'), size = 1000, replace = T) 

df <- data.frame(vertical_title = a, horitzontal_title = b) 

table(df) 

       horitzontal_title 
vertical_title a b c 
      1 118 98 106 
      2 106 95 121 
      3 128 114 114 

Rmarkdownで私のテーブルに 'vertical_title'と 'horizo​​ntal_title'を表示します。次のように

Answer 1

あなたは、テーブルを作成することができます

--- 
title: Example 1 
output: pdf_document 
--- 

### This is a test 

```{r,results='asis',echo=FALSE} 

library(xtable) 
a <- sample(x = c(1,2,3), size = 1000, replace = T) 
b <- sample(x = c('a', 'b', 'c'), size = 1000, replace = T) 

df <- data.frame(vertical_title = a, horitzontal_title = b) 
df <- as.data.frame.matrix(table(df)) 


print(xtable(df, 
      align = "|l|rrr|", 
      caption = "Test"), 
     caption.placement = 'top', 
     comment = F, 
     scalebox=1, 
     include.rownames = T, 
     hline.after = c(-1,0,nrow(df)), 
     vline.after = c(1), 
     format.args=list(big.mark = ",", decimal.mark = ".")) 


``` 

は、あなたのタイトルを複数列とmultirowsを追加する方法についてはこちらをご覧ください：

R package xtable, how to create a latextable with multiple rows and columns from R

・ホープ、このことができます！