xts_to_tbl <- function(xts) {
ind <- xts::ind
tibble::add_column(as_tibble(xts),
index = index(xts), before = 1)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.