posterior_df <- data.frame(`yhat[1,2]` = rep(0, 2), `yhat[2,2]` = rep(1, 2),
check.names = FALSE)
stocks <- c("S1", "S2")
extract_timeseries_stock("S2", posterior_df, stocks, "yhat")
Run the code above in your browser using DataLab