profit_data <- diff(log(zoo::as.zoo(datasets::EuStockMarkets)$FTSE), 365)
profit_data <- zoo::fortify.zoo(profit_data)
names(profit_data) <- c("Index", "profit")
# gender_data$gender <- as.character(gender_data$gender)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.