Нелинейный PLS в R с помощью карета?

Question

Есть ли простой способ реализовать компонент нелинейного моделирования в модели PLS в карете?

control <- trainControl(method = "repeatedcv", number = 10, repeats = 5, returnResamp = "all")

pls_model <- train(x ~ ., data = data, method = "pls", trControl = control, tuneLength = 10, metric = "RMSE")