如何获得R中所有雅虎财经共同基金的清单?

时间:2013-07-20 06:58:46

标签: r quantmod yahoo-finance

我想获得通过雅虎财经提供给R的所有共同基金的清单.TTR包中有一个stockSymbols功能,但它似乎没有获得共同基金。

谢谢,

1 个答案:

答案 0 :(得分:3)

我不认为雅虎提供了他们拥有数据的所有共同基金的清单 (同样,他们没有提供他们所涵盖的股票清单)。 您可以从评论中提到的网站下载列表, 循环通过所有资金, 从Yahoo检索相应的“个人资料”页面, 并提取您需要的信息 - “类别”字段 似乎是你想要的“行业和行业”最接近的东西。

# Read the list of funds
# I assume the file was downloaded manually from 
#   http://www.eoddata.com/Data/symbollist.aspx?e=USMF
# This requires registration (free).
d <- read.delim( "USMF.txt", stringsAsFactors = FALSE )

# Retrieve the profile page, for each of the funds.
# It takes 1 second for each, and there are 24,000 of them:
# this may take more than 6 hours.
library(RCurl)
library(stringr)
d$Category <- ""
for( i in seq_len(nrow(d)) ) {
  try({
    url <- paste0("http://uk.finance.yahoo.com/q/pr?s=", d$Symbol[i])
    cat( url, " " )
    profile <- getURL(url)
    row  <- str_extract(profile, "Category.*?</tr>")
    cell <- str_extract(row,     "<td.*</td>"      )
    d$Category[i] <- str_replace_all( cell, "<.*?>", "" )
    cat( d$Category[i], "\n" )
  })
}
head(d)