QuantMod 3D графика - PullRequest
Новая
       3

QuantMod 3D графика

3 голосов
/ 11 сентября 2011

Я пытаюсь использовать код на веб-сайте quantmod для 3D-графика .Я следовал инструкциям и ввел 2010 год (с 2008 года ссылка не найдена).Однако, когда я ввожу эту команду в приглашении R: 

 chartSeries3d0(TR)

, я получаю следующую ошибку: 

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

Я относительно новичок в R, так что любой может помочь мне исправить это.

1 Ответ

3 голосов
/ 11 сентября 2011

Казначейство перепроектировало свой веб-сайт с момента создания этого примера, поэтому код не загружает никаких данных (независимо от того, в каком году вы вводите).Вместо использования функции 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"])
...