神经网络简单时间序列预测在R

神经网络简单时间序列预测在R,r,neural-network,R,Neural Network,这应该是61作为输出,因为我使用了从1到59的简单训练数作为输入,以60分钟作为输出…然后我使用了2到60个数字,看到结果是60,这是错误的,因为它的简单系列 library("neuralnet") testtime=59 i=59 s=61 testinput=0 testresults_values=0 testtrainingoutput=0 xnam_2 <- paste0("testinput[",1:i,"]") (fmla_2 <- as.formula(paste

这应该是61作为输出,因为我使用了从1到59的简单训练数作为输入,以60分钟作为输出…然后我使用了2到60个数字,看到结果是60,这是错误的,因为它的简单系列

library("neuralnet")
testtime=59
i=59
s=61
testinput=0
testresults_values=0
testtrainingoutput=0

xnam_2 <- paste0("testinput[",1:i,"]")
(fmla_2 <- as.formula(paste("testInsertoutput[",60,"]~", paste(xnam_2, collapse= "+"))))



   testtraininginput=seq(1,59,by=1)

   testinput[1:59]=testtraininginput

   testtrainingoutput[60] <- 60

    #if(is.na(trainingoutput)==TRUE){break} - Can be used for future

    testInsertoutput=testtrainingoutput

    data=cbind(testinput,testInsertoutput)

    testnet.sqrt<- neuralnet(fmla_2,data,hidden=1)

    testdata_new<- seq(2,60,by=1)
    testnewvale=as.data.frame(t(testdata_new))

    testnet.results <- compute(testnet.sqrt,testnewvale[,1:testtime]) #Run them through the neural 
    testresults_values=testnet.results$net.result

testresults_values

您是否有其他文档表明您的训练网络将始终递增?您只有一个观察值和60个变量:毫不奇怪,神经网络给出了一个几乎恒定的模型。@VincentZoonekynd感谢您验证我对问题根源的天真直觉。:-谢谢Vincent ZooneKynd和Carl Withhoft的回答…那么我应该如何设置这个问题,即将数字和训练用于一个输出,即数字从1到5,并将6作为输出…然后给出数字从2到6…在这种情况下,输出应该是7…我对神经网络和训练一无所知,看来你并不比我领先多少:-,所以我建议你和一个知识渊博的人谈谈,让他明白训练一张网学习数数意味着什么。