[我知道有人可以使用Quantmod从Yahoo Finance获取财务信息。下面的代码通过股票代码搜索。
我如何通过与Yahoo Finance中的名称不完全匹配的公司名称进行搜索?我所拥有的是公司名称列表,而不是股票代码,例如Microsoft Corp(而不是Microsoft Corporation)。
library(quantmod)
library(plyr)
what_metrics <- yahooQF(c("Name",
"Price/Sales",
"P/E Ratio",
"Price/EPS Estimate Next Year",
"PEG Ratio",
"Dividend Yield",
"Market Capitalization"))
Symbols<-c("XOM","MSFT","JNJ","GE","CVX","WFC","PG","JPM","VZ","PFE","T","IBM","MRK","BAC","DIS","ORCL","PM","INTC","SLB")
metrics <- getQuote(paste(Symbols, sep="", collapse=";"), what=what_metrics)
您可以下载贸易公司列表,然后使用例如正则表达式。当然,查询的复杂性取决于您确切拥有的信息。例如:
library(quantmod)
library(tidyverse)
nasdaq_names = stockSymbols(exchange="NASDAQ")
nasdaq_names %>%
filter(str_detect(Name, "Microsoft Corp")) %>%
pull(Symbol)
[1] "MSFT"