预测函数有效，但预测不起作用

Question

Sample :-

Change  Name   Age
-5.20   BBB     58
-3.59   AAA     59
-3.53   CCC     129
-4.33   CCC     76
-3.23   CCC     117
-4.37   BBB     32
-3.95   DDD     76
-2.91   CCC     49

New  :-

Change   Name    Age
-3.53    CCC     127
-5.30    BBB     61
-3.10    CCC     88
-2.93    CCC     52
-4.75    BBB     35
-2.8     CCC     52
-3.5     CCC     132
-4.01    DDD     79

require(forecast)   
m<- lm(Change ~ Name+ Age, data=sample)
f<- forecast.lm(object = m,newdata = New)
p<- predict.lm(object = m,newdata = New)

预测函数在这种情况下有效，但预测函数会出错。错误是

Error in if (nrow(origdata) != length(fcast$x)) tspx <- NULL : 
 argument is of length zero

我已经做了很多测试，看到样本数据和用于预测的新数据都没有NA或Null值。我想使用预测功能，因为我可以使用预测对象的准确性和其他此类功能。请帮忙。