Я не уверен, почему я продолжаю получать ошибку.Я пытался выяснить источник ошибки.
BC <-breast_cancer
str(BC)
# New variable
BC$New_irradiat <- factor(BC$Age)
set.seed(1234)
# partition data
pd <- sample(2,nrow(BC),replace = TRUE,
prob = c(0.8,0.2))
# Trained set
train <-BC[pd==1,]
test <- BC[pd==2,]
# Decision Tree with Party Package
library(party)
BC_tree <- ctree(Age~., data = train)