fix predict method in R

as the fix of MLSupporter.newModel of PR #26 , the ML model's predict method should be changed.