web-dev-qa-db-ja.com

複数のテーブルを並べて配置する

次のコードは、互いの上に2つのテーブルを生成します。それらを並べて設定するにはどうすればよいですか? 3連?

---
title: "sample"
output: pdf_document
---

```{r global_options, R.options=knitr::opts_chunk$set(warning=FALSE, message=FALSE)}
```   

```{r sample, echo=FALSE, results='asis'}
library(knitr)
t1 <- head(mtcars)[1:3]
t2 <- head(mtcars)[4:6]
print(kable(t1))
print(kable(t2))
```

出力は次のようになります。 enter image description here

17
Doug Fir

リストに2つのデータフレームを置くだけです。

t1 <- head(mtcars)[1:3]
t2 <- head(mtcars)[4:6]
knitr::kable(list(t1, t2))

これにはknitr> = 1.13が必要です。

23
Yihui Xie

私はこれを使用しました knitrで2つのdata.framesを隣り合わせに配置しますか? これはhtmlとこれで行う方法を示しています https://tex.stackexchange.com/questions/2832/how-can-i-have-two-tables-side-by-side 2つのラテックステーブルを並べて配置します。 xtableを使用してテーブルの行を調整できるため、テーブルの行を自由に調整できないようです(これについて詳しく知っている人はいますか?)。 format = Latex各行の後に水平線が表示されます。しかし、ドキュメントには他の形式の2つの例が示されています。 longtableパッケージを使用するもの(追加の引数:longtable = TRUE)およびbooktabsパッケージ(booktabs = TRUE)。

---
title: "sample"
output: pdf_document
header-includes:
- \usepackage{booktabs}
---

```{r global_options, R.options=knitr::opts_chunk$set(warning=FALSE, message=FALSE)}
```


```{r sample, echo=FALSE, results='asis'}
library(knitr)
library(xtable)

t1 <- kable(head(mtcars)[1:3], format = "latex", booktabs = TRUE)
t2 <- kable(head(mtcars)[4:6], format = "latex", booktabs = TRUE)

cat(c("\\begin{table}[!htb]
    \\begin{minipage}{.5\\linewidth}
      \\caption{}
      \\centering",
        t1,
    "\\end{minipage}%
    \\begin{minipage}{.5\\linewidth}
      \\centering
        \\caption{}",
        t2,
    "\\end{minipage} 
\\end{table}"
))  
```

enter image description here

16
Alex