删除r中的部分字符向量

Question

我正在运行以下内容

# 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

例如symbols.f <- c("HOC.f", "GOOG.f", "GE.f")

Answer 1

你可以使用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"