svm.predict无法预测新数据集

Question

数据集相当简单，

如果我将result1视为数字变量，我试图看看结果的预测是什么。

所以我将数据集子集化为两部分，一部分用于训练，另一部分用于随机测试，运行svm代码，并预测测试集

wh.train = wh[1:1106,]
wh.test = wh[1107:1120,]
model1 = svm(result1 ~., wh.train)
pred1 = predict(model1, wh.test)

然后结果出来对我来说真的很奇怪，     名为numeric（0）