# RETURNS SPECIFIC FIELD FROM A LIST OF ROLLING CALCULATIONS, WHICH HAS THE SAME FIELDS FOR EVERY ENTRY, WHERE THE ENTRIES REPRESENT
# ROLLING PERIODS
extractFieldFromRoll = function(roll, field){
# require(xts)
result = matrix(NA, nrow = length(roll), ncol = length(roll[[1]][field][[1]]))
colnames(result) = names(roll[[1]][field][[1]])
for (i in 1:length(roll)){
result[i,] = t(as.vector(roll[[i]][field][[1]]))
}
return(xts::xts(result, order.by = as.yearmon(names(roll))))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.