差分

このページの2つのバージョン間の差分を表示します。

この比較画面へのリンク

両方とも前のリビジョン前のリビジョン
次のリビジョン両方とも次のリビジョン
mselab:2016:stat:week2 [2016/11/29 11:06] watalumselab:2016:stat:week2 [2016/11/29 11:17] watalu
行 267: 行 267:
 tic.rpart <- rpart(V86~.,data=tic.learn.2) tic.rpart <- rpart(V86~.,data=tic.learn.2)
 v86.rpart <- predict(tic.rpart,newdata=tic.eval,type="class") v86.rpart <- predict(tic.rpart,newdata=tic.eval,type="class")
-table(v86.rpart$class, tic.eval$V86)+table(v86.rpart, tic.eval$V86)
 </code> </code>