# NOT RUN {
cpi <- xd.fred("CPIAUCSL") # CPI data
head(cpi)
tail(cpi)
#Frequently used tickers:
#CPIAUCSL: Consumer Price Index for All Urban Consumers: All Items
#A191RL1Q225SBEA: Real Gross Domestic Product
#DGS10: 10-Year Treasury Constant Maturity Rate
#UNRATE: Civilian Unemployment Rate
# }
Run the code above in your browser using DataLab