使用Caret进行数值预测

Question

我想使用Caret进行预测（预测用电量）。我想获得实际的用电量，但是预测结果显示了1。 我想预测'MtrRegActNetEngyDailyKwh'的列。

我训练了模型并进行了预测：

model_nnet<-train(trainSet[,predictors],trainSet[,outcomeName],method='nnet')
predictions<-predict.train(object=model_nnet,testSet[,predictors],type="raw")
table(predictions)

但是，我没有得到预期的输出。我得到的是：

predictions
    1 
18675

我希望获得每条记录的预计用电量。我不确定我做错了什么。我可以帮忙吗？

“我的数据”示例（所有列均为数字）：

structure(list(x_NMI = c(6347, 6347), EstimateReadBitmaskInd = c(0, 
0), MeterRegActiveReadingDt = c("15-01-2013", "18-01-2013"), 
    MtrRgActNetEngyMaxdlyKwh = c(0.831, 
    0.65), RegisterId = c(2, 2), RegisterType = c(2, 2), Building = c(6, 
    6), numberofpeople = c(5, 5), pool = c(2, 2), typeofAC = c(1, 
    1), NoOfAc = c(1, 1)), row.names = 1:2, class = "data.frame")