有没有办法解决这个错误？match.arg（type） 中的错误：“arg”应该是“class”、“probs”之一

问：

有没有办法解决这个错误？

match.arg（type） 中的错误：“arg”应该是“class”、“probs”之一

在使用逻辑回归进行预测时发生。

# Load libraries
library(MASS)
library(caret)
library(nnet) 

# Loading iris dataset
data(iris)

# Convert it into a binary class dataset
iris$Species <- ifelse(iris$Species == "setosa", "setosa", "other")

# Split the dataset
set.seed(123)
trainIndex <- createDataPartition(iris$Species, p = .8, 
                                  list = FALSE, 
                                  times = 1)
irisTrain <- iris[ trainIndex,]
irisTest  <- iris[-trainIndex,]

# Fit Logistic Regression
fit.glm <- multinom(Species ~ ., data = iris)

# Predict using Logistic Regression
**pred.glm <- ifelse(predict(fit.glm, irisTest, type = "response") > 0.5, "setosa", "other")**
cm.glm <- confusionMatrix(pred.glm, as.factor(irisTest$Species))
acc.glm <- cm.glm$overall['Accuracy']
prec.glm <- cm.glm$byClass['Pos Pred Value']
rec.glm <- cm.glm$byClass['Sensitivity']

我正在尝试使用逻辑回归来预测结果。我知道存在级别问题，但不确定这是否是我当前错误的情况。