Hi, When I try the code below, I get an error, and I don't know how to solve it. Can anyone help me understand this error and/or give me suggestions?

Y = test$atcdhephem

X = test[, c(3:ncol(test))]

plsda_hh_hsd <- opls(X, Y, scaleC = c("none"), permI = 20)

No model was built because the first predictive component was already not significant.
PLS-DA
40 samples x 82 variables and 1 response
none scaling of predictors and standard scaling of response(s)
Empty 'opls' object