R - 神经网络 - 虹膜数据集

Question

我尝试在虹膜数据集上使用nnet，但我不知道如何解决下面显示的错误。任何帮助赞赏。感谢。

library(nnet)
attach(iris)

library(caret)
set.seed(3456)
trainIndex <- createDataPartition(iris$Species, p = .8,
                              list = FALSE,
                              times = 1)
irisTrain <- iris[ trainIndex,]
irisTest  <- iris[-trainIndex,]

irispred <- nnet(species ~ ., data=irisTrain, size=10)
predicted <- predict(irispred,irisTest,type="class")

model.frame.default中的错误（formula = species~。，data = irisTrain）：   变量长度不同（找到＆＃39; Sepal.Length＆＃39;）