Я полагаю, что вы хотите указать свои тестовые наблюдения в самом вызове randomForest
, что-то вроде этого:
set.seed(71)
ind <- sample(1:150,140,replace = FALSE)
train <- iris[ind,]
test <- iris[-ind,]
iris.rf1 <- randomForest(x = train[,1:4],
y = train[,5],
xtest = test[,1:4],
ytest = test[,5],
importance=TRUE,
proximity=TRUE)
dim(iris.rf1$test$prox)
[1] 10 150
Так что это дает вам близость от десяти контрольных примеров ко всем 150.
Единственным другим вариантом было бы позвонить predict
по вашему новому делу rbind
в исходное учебное дело, я думаю. Но в этом случае вам не нужно иметь предварительные тесты с вызовом randomForest
.
В этом случае вы захотите использовать keep.forest = TRUE
в вызове randomForest
и, конечно, установить proximity = TRUE
при вызове predict
.