Error in Confusion Matrix : the data and reference factors must have the same number of levels

106,837

Solution 1

Do table(pred) and table(testing$Final). You will see that there is at least one number in the testing set that is never predicted (i.e. never present in pred). This is what is meant why "different number of levels". There is an example of a custom made function to get around this problem here.

However, I found that this trick works fine:

table(factor(pred, levels=min(test):max(test)), 
      factor(test, levels=min(test):max(test)))

It should give you exactly the same confusion matrix as with the function.

Solution 2

I had the same issue. I guess it happened because data argument was not casted as factor as I expected. Try:

confusionMatrix(pred,as.factor(testing$Final))

hope it helps

Solution 3

confusionMatrix(pred,testing$Final)

Whenever you try to build a confusion matrix, make sure that both the true values and prediction values are of factor datatype.

Here both pred and testing$Final must be of type factor. Instead of check for levels, check the type of both the variables and convert them to factor if they are not.

Here testing$final is of type int. conver it to factor and then build the confusion matrix.

Solution 4

Something like the follows seem to work for me. The idea is similar to that of @nayriz:

confusionMatrix(
  factor(pred, levels = 1:148),
  factor(testing$Final, levels = 1:148)
)

The key is to make sure the factor levels match.

Solution 5

On a similar error, I forced the GLM predictions to have the same class as the dependent variable.

For example, a GLM will predict a "numeric" class. But with the target variable being a "factor" class, I ran into an error.

erroneous code:

#Predicting using logistic model
glm.probs = predict(model_glm, newdata = test, type = "response")
test$pred_glm = ifelse(glm.probs > 0.5, "1", "0")


#Checking the accuracy of the logistic model
    confusionMatrix(test$default,test$pred_glm)

Result:

Error: `data` and `reference` should be factors with the same levels.

corrected code:

#Predicting using logistic model
    glm.probs = predict(model_glm, newdata = test, type = "response")
    test$pred_glm = ifelse(glm.probs > 0.5, "1", "0")
    test$pred_glm = as.factor(test$pred_glm)
    
#Checking the accuracy of the logistic model
confusionMatrix(test$default,test$pred_glm)

Result:

confusion Matrix and Statistics

          Reference
Prediction     0     1
         0   182  1317
         1   122 22335
                                          
               Accuracy : 0.9399          
                 95% CI : (0.9368, 0.9429)
    No Information Rate : 0.9873          
    P-Value [Acc > NIR] : 1          
Share:
106,837
Admin
Author by

Admin

Updated on December 13, 2021

Comments

  • Admin
    Admin over 2 years

    I've trained a Linear Regression model with R caret. I'm now trying to generate a confusion matrix and keep getting the following error:

    Error in confusionMatrix.default(pred, testing$Final) : the data and reference factors must have the same number of levels

    EnglishMarks <- read.csv("E:/Subject Wise Data/EnglishMarks.csv", 
    header=TRUE)
    inTrain<-createDataPartition(y=EnglishMarks$Final,p=0.7,list=FALSE)
    training<-EnglishMarks[inTrain,]
    testing<-EnglishMarks[-inTrain,]
    predictionsTree <- predict(treeFit, testdata)
    confusionMatrix(predictionsTree, testdata$catgeory)
    modFit<-train(Final~UT1+UT2+HalfYearly+UT3+UT4,method="lm",data=training)
    pred<-format(round(predict(modFit,testing)))              
    confusionMatrix(pred,testing$Final)
    

    The error occurs when generating the confusion matrix. The levels are the same on both objects. I cant figure out what the problem is. Their structure and levels are given below. They should be the same. Any help would be greatly appreciated as its making me cracked!!

    > str(pred)
    chr [1:148] "85" "84" "87" "65" "88" "84" "82" "84" "65" "78" "78" "88" "85"  
    "86" "77" ...
    > str(testing$Final)
    int [1:148] 88 85 86 70 85 85 79 85 62 77 ...
    
    > levels(pred)
    NULL
    > levels(testing$Final)
    NULL