re-initialize pred_type if needed

re-do initialization at time of prediction if the tree isn't grown with oobag error.

Author: bcjaeger

R/orsf_R6.R

@@ -380,6 +380,11 @@ ObliqueForest <- R6::R6Class(
 
    if(self$pred_type != 'none'){
     private$clean_pred_oobag()
+   } else {
+    # revert pred type to NULL so it is correctly
+    # initialized when this object is passed to
+    # other orsf functions
+    self$pred_type <- NULL
    }
 
    self$trained <- TRUE