knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(quantmod) getSymbols("RECPROUSM156N", src = "FRED") library(econModel) getSymbols("RECPROUSM156N", src = "ALFRED", LookBack = 4) index(RECPROUSM156N) <- index(RECPROUSM156N) + 61 index(RECPROUSM156N.vin) <- index(RECPROUSM156N.vin) + 61
library(dygraphs) dygraph(merge(RECPROUSM156N, RECPROUSM156N.vin))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.