小技メモ（表をグラフに描画する）

表はtableで取得してcsvに吐き出すというのが常套手段ですが、表が多くなってくると確認が面倒です。

ですので以下のようにすると表を直接グラフ画面でチェックすることが出来ます。

library(gridExtra)

par(mar = c(0, 0, 0, 0))
plot(1, axes = F, xlab = "", ylab = "")
grid.draw(tableGrob(head(iris, 10), show.csep=TRUE, show.rsep=TRUE, show.box=TRUE, separator="grey", name="test"))

Tab <- table(iris[, 5], iris[, 5])
plot(1)
rect(-10, -10, 10, 10, col = "white")
grid.draw(tableGrob(Tab))

まだあまり調べてないけど、いろいろオプションがありそう。

表の色彩がSASっぽいwww

PDFで出力もできますが、PDFをエクセルにコピペしても表の形になりませんorz

またカテゴリの数が多いとグラフエリアからはみ出しますorz......（誰か助けて）