Hi, this is my R-script I need to make a confusion matrix but the last row return me an error
require(mixOmics) require(SDMTools) file <- "C:\\data.txt" d <- read.table(file, header=T, row.names = NULL) X <- as.matrix(d[,2:11]) Y <- as.factor(d[,1]) i <- 1 samp <- sample(1:3, nrow(X), replace = TRUE) # Creation of a list of the same size as X test <- which(samp == i) # Search which column in samp has a value of 1 train <- setdiff(1:nrow(X), test) # Keeping the column that are not in test #PLS-DA plsda.train <- plsda(X[train, ], Y[train], ncomp = 10) test.predict <- predict(plsda.train, X[test, ], method = "class.dist") confusion.matrix(test.predict, Y[-train]) Error in confusion.matrix(test.predict, Y[-train]) : this requires the same number of observed & predicted values I have no idea why it don't work Thank you for help -- View this message in context: http://r.789695.n4.nabble.com/confusion-matrix-error-tp3568913p3568913.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
