1. akahoshi51

    No comment

    akahoshi51
Changes in body
Source | HTML | Preview
@@ -1,19 +1,20 @@
R言語で決定木分析を行うサンプルプログラムを書いたので投稿します。
```r:03_Decision_tree.R
library(rpart)
library(partykit)
library(epitools)
#Read data
data_titanic<-expand.table(Titanic)
#Making decision tree
result<-rpart(Survived~., data = data_titanic)
#Plot result
plot(as.party(result)
```
結果
-![03_Output.jpg](https://qiita-image-store.s3.amazonaws.com/0/111514/c9696a95-5ba-8a0e-a039-1d1e3cc45fd9.jpeg)
+![03_Output.jpg](https://qiita-image-store.s3.amazonaws.com/0/111514/87fe13a9-6196-754a-a495-eafc10c5703a.jpeg)
+
+