Rolling regression coefficients using modeltime or tidymodels

Hi,

I would like to get the coefficients from a rolling regression, using modeltime or tidymodel. So, for the sake of this example, I will be working with FANG dataset from the library "tidyquant".

The packages I will be using is this:

library(tidyselect)
library(tidyquant)
library(modeltime)
library(timetk)


The dataset I will be working with is FANG:

data <- FANG %>%
pivot_wider(names_from = symbol,