Create a gist now

Instantly share code, notes, and snippets.

カテゴリカルデータ解析第10章練習問題解答
# 1.
data("JointSports")
result <- ctree(opinion ~ year + grade + gender, data = JointSports,
weights = Freq)
plot(result)
# 2.
titan.d <- data.frame(Titanic)
head(titan.d)
result <- ctree(Survived ~ Class + Sex + Age, weights = Freq,
data = titan.d)
plot(result)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment