I tried using decision tree algorithm in R which is pretty straightforward but while plotting the plot for R48 algorithm all the nodes are labelled as "setosa"
, but on many sites and as per my thinking the nodes must have been different. Can someone please point out the error in the code?
library(RWeka)
m1 <- J48(Species ~ ., data = iris)
m1
summary(m1)
table(iris$Species, predict(m1))
## use partykit package
if(require("partykit", quietly = TRUE)) plot(m1)
## using party
if(require("party", quietly = TRUE)) plot(m1)