ヤフーから業界を取得する。

Question

ヤフー、ファイナンス、Googleファイナンスなどの株価指数の業界分類を取得するにはどうすればよいですか（Rを使用することをお勧めします）。説明するために は、私は

ticker_industy <- data.frame(ticker=ticker_list,industry=rep(NA,length(ticker_list) 
head(ticker_industry) 
    ticker industry 
1  BDX  NA 
2  BLL  NA 
3  CB  NA 
4  CELG  NA 
5  CHK  NA 
6  CI  NA 

など

好ましくは、Rは、各ティッカーのための対応業界をフェッチし、テロップのリストを持っています。

Answer 1

この機能は、あなたのための作業を行う必要があります...

industry=function(ticker) 
{ 
    url=paste("https://in.finance.yahoo.com/q/in?s=",ticker,sep=',') 
    mydata=as.data.frame(readLines(url)) 
    names(mydata)="text" 
    ind=str_match(as.character(mydata$text[117]),'(?:<b>Industry: ?)(.*?)(?:<)')[,2] 
    ind=str_replace_all(ind,'&amp;','&') 
    return(ind) 
}