How to reproduce predict.svm in R? [closed]

Answer 1

There was a minor error in one of my functions. The edited version works.