---
title: "RVFL model for univariate time series"
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{RVFL model for univariate time series}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

```{r}
library(rvfl)
require(glmnet)
require(survival)
```

```{r, fig.width=6.5}
plot(ahead::dynrmf(fit_func=rvfl::rvfl, y=fdeaths, engine=glmnet::cv.glmnet, h=20L))
```

```{r, fig.width=6.5}
plot(ahead::dynrmf(fit_func=rvfl::rvfl, y=mdeaths, engine=glmnet::cv.glmnet, h=20L))
```

```{r, fig.width=6.5}
plot(ahead::dynrmf(fit_func=rvfl::rvfl, y=ldeaths, engine=glmnet::cv.glmnet, h=20L))
```

```{r, fig.width=6.5}
plot(ahead::dynrmf(fit_func=rvfl::rvfl, y=Nile, engine=glmnet::cv.glmnet, h=20L))
```