トップ 差分 一覧 Farm ソース 検索 ヘルプ PDF RSS ログイン

xtabs()

*disclaimer
178092

R
[R]

xtabs() 分割表の作成


xtabs(~ 見出し + 見出し, データフレーム)

data(cars)
cars.head <- head(cars, 20)

xtabs(~ speed + dist, cars.head)

     dist
speed 2 4 10 14 16 17 18 20 22 24 26 28 34 46
   4  1 0  1  0  0  0  0  0  0  0  0  0  0  0
   7  0 1  0  0  0  0  0  0  1  0  0  0  0  0
   8  0 0  0  0  1  0  0  0  0  0  0  0  0  0
   9  0 0  1  0  0  0  0  0  0  0  0  0  0  0
   10 0 0  0  0  0  0  1  0  0  0  1  0  1  0
   11 0 0  0  0  0  1  0  0  0  0  0  1  0  0
   12 0 0  0  1  0  0  0  1  0  1  0  1  0  0
   13 0 0  0  0  0  0  0  0  0  0  1  0  2  1
   14 0 0  0  0  0  0  0  0  0  0  1  0  0  0




Reference

https://www1.doshisha.ac.jp/~mjin/R/Chap_45/45.html