r - 在 R 中使用 Rblpapi 查找 GICS 扇区

Question

我正在尝试用函数的输出替换我的数据中的一列：bdp(column + "equity", "GICS_SECTOR NAME")

Require(Rblpapi)
#Create raw data example
ticker <- c(2,3,4,5,6)
sector <- c(NA,NA,NA,NA,NA)
dataraw <- data.frame(ticker, random)

dataraw$sector <- bdp("dataraw$ticker Equity", "GICS_SECTOR_NAME")

这不起作用，因为“”仅将其设为文本，我必须添加“Equity”一词，例如 IBM Equity。一个完美运行的例子是 bdp("IBM Equity", "GICS_SECTOR_NAME")

Answer 1

您可以使用粘贴添加“Equity”部分，并将生成的股票代码用作以下参数bdp：

#Create raw data example
ticker <- c("IBM", "AAPL", "MSFT", "FB")
sector <- c(NA,NA,NA,NA)
df <- data.frame(ticker, sector)
df$ticker_full <- paste(df$ticker, "US Equity", sep = " ")

conn <- Rblpapi::blpConnect()

sectors <- bdp(securities = df$ticker_full,
               fields = "GICS_SECTOR_NAME")

> print(sectors)
                     GICS_SECTOR_NAME
IBM US Equity  Information Technology
AAPL US Equity Information Technology
MSFT US Equity Information Technology
FB US Equity   Communication Services

df$sector <- sectors$GICS_SECTOR_NAME

> print(df)
  ticker                 sector    ticker_full
1    IBM Information Technology  IBM US Equity
2   AAPL Information Technology AAPL US Equity
3   MSFT Information Technology MSFT US Equity
4     FB Communication Services   FB US Equity