events <- list(
dates = c("2001-09-11", "2008-09-15", "2020-01-27"),
labels = c(
"9/11 terrorist attack", "Bankruptcy Lehman Brothers",
"First COVID-19 case Germany"
)
)
events <- fHMM_events(events)
Run the code above in your browser using DataLab