library(nnfor)
attach(Forecast_for_nnfor)
tsrecon<-ts(annual)
plot(tsrecon)
mlp.fit<-mlp(tsrecon)
plot(mlp.fit)
print(mlp.fit)
mlp.frc<-forecast(mlp.fit, h=15, include= total year numbers)
plot(mlp.frc)
summary(mlp.frc)
Example:
library(nnfor)
attach(Forecast_for_nnfor)
tsrecon<-ts(annual)
plot(tsrecon)
mlp.fit<-mlp(tsrecon)
plot(mlp.fit)
print(mlp.fit)
mlp.frc<-forecast(mlp.fit, h=15, include=38)
plot(mlp.frc)
summary(mlp.frc)
