December 22, 2014

回帰木+ヒストグラムの図を描く

回帰木の下にヒストグラムがあると格好良いと思ったので、メモしておく。

library("party")

data(cars)

model <- ctree(dist~., data=cars)

t.style <- node_hist(model, ymax=0.06, xscale=c(0,150), col="red", fill=hsv(0.6, 0.5, 1))

plot(model, terminal_panel = t.style)

回帰木

参考

  • [Rによるデータサイエンス13「樹木モデル」

](http://www.slideshare.net/takemikami/r13-9821987)

© gepuro 2013