Plotting a list of "Numerical" functions
If Off[PredictorFunction::mlincfttp]
won't work, perhaps this:
(* holds up evaluation until x is numeric *)
ClearAll[applyN];
applyN[f_][x_?NumericQ] := f[x];
Plot[Evaluate@Through@(applyN /@ predictors)@x, {x, 0, 5}]
You could try with:
Show[Plot[#[x], {x, 0, 5}, PlotStyle -> RandomColor[]] & /@
predictors]
Or if you want the same colorscheme for each plot:
colors = {Blue, Red};
Show[Plot[predictors[[#]][x], {x, 0, 1}, PlotStyle -> colors[[#]]] & /@
Range@Length[predictors],PlotRange -> All]