我正试图每天运行一个脚本来分析今天的价格与不久前从一个筛选器中挑选出来的股票相比。
为此,我加载了一个csv文件中的数据,其中一列的标题是"Ticker",并清理了它,让我感兴趣的股票,例如苹果,谷歌和微软。
然后用下面的代码创建一个向量:
tickers <- paste(shQuote(data$Ticker), collapse = ", ")
当我试图用这样的方法来降低价格的时候:
today <- getQuote(tickers)
我在下载中得到了一个错误,但是如果我像这样编码它:
today <- getQuote(c("AAPL", "GOOG", "MSFT")
它把细节拉下来很好,我可以继续。
因为大多数时候有80多只股票,我想让它自动化,但很明显我做错了什么--有什么想法吗?
发布于 2018-03-24 03:06:24
我相信你只需要打电话给getQuote(data$Ticker)
。如果data$Ticker
是一个factor
,那么就把它转换为一个角色。就是,getQuote(as.character(data$Ticker))
。我希望这能帮到你!
发布于 2018-03-24 03:10:13
也许你需要独特的股票代码?
tickers <- paste(unique(shQuote(data$Ticker)), collapse = ", ")
https://stackoverflow.com/questions/49460526
复制相似问题