# NOT RUN {
## Train a PSF model from the univariate time series 'nottem' (package:datasets).
p <- psf(nottem)
## Forecast the next 12 values of such time series.
pred <- predict(p, n.ahead = 12)
## Plot forecasted values.
plot(p, pred)
# }
Run the code above in your browser using DataLab