› e051103 › 課題2008年05月26日
課題
x<-read.table("n:/oecd1997.dat",header=T) > library(mvpart)
> kekka<-rpart(Country~.,data=x)
> plot(kekka)
> text(kekka)
>
Posted by e051103 at 14:15│Comments(0)
x<-read.table("n:/oecd1997.dat",header=T) > library(mvpart)
> kekka<-rpart(Country~.,data=x)
> plot(kekka)
> text(kekka)
>
画像一覧 