Make predictions add features work again

Author: koenderks

R/mlPrediction.R

@@ -422,7 +422,7 @@ is.jaspMachineLearning <- function(x) {
   selection <- predictions[indexes]
   cols <- list(row = indexes, pred = selection)
   if (options[["predictionsTableFeatures"]]) {
-    for (i in model[["jaspVars"]][["encoded"]]$predictors) {
+    for (i in colnames(dataset)) {
       if (.columnIsNominal(i)) {
         table$addColumnInfo(name = i, title = i, type = "string")
         var <- levels(dataset[[i]])[dataset[[i]]]

inst/help/mlPrediction.md

@@ -1,6 +1,8 @@
 Prediction
 ===
 
+The prediction analysis enables you to load a trained machine learning model and apply it to new data. It is important that the features in the new dataset have the same names as in the original dataset used for training.
+
 ### Input
 
 #### Trained Model

inst/help/mlPrediction_nl.md

@@ -1,6 +1,8 @@
 Voorspellen
 ===
 
+Met de voorspellingsanalyse kun je een getraind machine-learningmodel laden en toepassen op nieuwe gegevens. Het is belangrijk dat de kenmerken in de nieuwe dataset dezelfde namen hebben als in de oorspronkelijke dataset die voor de training is gebruikt.
+
 ### Invoer
 
 #### Getraind model

inst/qml/mlPrediction.qml

@@ -26,7 +26,7 @@ import "./common/tables" as TAB
 
 Form 
 {
-	info: qsTr("The prediction analysis enables you to load a trained machine learning model and apply it to new data.")
+	info: qsTr("The prediction analysis enables you to load a trained machine learning model and apply it to new data. It is important that the features in the new dataset have the same names as in the original dataset used for training.")
 
 	FileSelector
 	{