我正在运行以下
# rm(list=ls(all=TRUE)) #It's more courteous to make that as a comment.
library(quantmod)
symbols <- c("HOG", "GE", "GOOG")
for (i in 1:length(symbols)) {
getFinancials(symbols[i], src="yahoo", auto.assign = TRUE)
}
symbols
中3家公司的下载资产负债表信息。但是,当我调用getFinancials
函数时,它会创建列表名称的附加内容。例如GOOG.f
。我有两个问题。
问题1:如何从列表中删除.f
部分?
问题2:如果我想保留.f
(因为如果我想使用getSymbols
,删除它会导致冲突如何编写新的symbols
字符值,但添加到.f
{1}}
例如symbols.f <- c("HOC.f", "GOOG.f", "GE.f")
答案 0 :(得分:3)
您可以使用paste0
添加.f和sub
将其取消。
symbols <- c("HOG", "GE", "GOOG")
( symbols.f <- paste0(symbols, ".f") )
[1] "HOG.f" "GE.f" "GOOG.f"
sub("\\.f","", symbols.f) #Periods (regex metacharacter) need to be double escaped.
[1] "HOC" "GOOG" "GE"