quantmod 3d图形

Question

我正在尝试使用quantmod website for a 3d graph上的代码。我按照指示进入了2010年的年份（自2008年以来没有找到链接）。然而，当我于R提示符下输入以下命令：

chartSeries3d0(TR) 

我得到以下错误：

Error in if (on == "years") { : missing value where TRUE/FALSE needed 

我是比较新的R，所以任何人都可以帮我解决这个问题。

Answer 1

财政部自该示例创建后重新设计了网站，因此代码不会下载任何数据（无论您输入什么年份）。而不是使用getUSTreasuries函数，您可以从FRED中提取数据。

library(quantmod) 
source("http://www.quantmod.com/examples/chartSeries3d/chartSeries3d.alpha.R") 

getSymbols("DGS1MO;DGS3MO;DGS6MO;DGS1;DGS2;DGS3;DGS5;DGS7;DGS10;DGS20;DGS30", 
    src="FRED") 
TR <- merge(DGS1MO,DGS3MO,DGS6MO,DGS1,DGS2,DGS3,DGS5, 
    DGS7,DGS10,DGS20,DGS30, all=FALSE) 
colnames(TR) <- c("1mo","3mo","6mo","1yr","2yr","3yr","5yr", 
    "7yr","10yr","20yr","30yr") 
TR <- na.locf(TR) 

chartSeries3d0(TR["2011"])