Error: could not find function "parse_model_rhs"

[mathias-314]

Brief description of the problem

Hi,

thank you for your great work in supporting and optimizing in time series analytics. I would like to study your package fasster with a code snippet from README.md and get the above mentioned error, when I run the following reprex.

I would be very happy, if you can help me to find the solution for this
regards
Mathias

---

library(fasster)
library(tidyverse)
library(lubridate)
library(tsibble)
library(fable)
library(fabletools)

elec_tr <- tsibbledata::vic_elec %>%
filter(
Time < lubridate::ymd("2012-03-01")
) %>%
mutate(WorkDay = wday(Time) %in% 2:6 & !Holiday)

elec_fit <- elec_tr %>%
model(
fasster = FASSTER(log(Demand) ~
WorkDay %S% (fourier(48, 16) + trend(1)) + Temperature + I(Temperature^2)
)