क्या पी/ई अनुपात, यील्ड आदि जैसे कई शेयरों की स्वचालित जानकारी प्राप्त करने का कोई तरीका है?

Question

मुझे आर या पायथन में दैनिक स्टॉक की कीमतें और वॉल्यूम प्राप्त करने के कुछ तरीके पता हैं, लेकिन यह सोच रहा है कि पी/ई अनुपात, कंपनी वेबसाइट, यील्ड जैसे स्टॉक के बारे में अधिक जानकारी प्राप्त करने के लिए यह एक तरीका है (या तो आर या पायथन का उपयोग करना) और इसी तरह, अधिमानतः न केवल वर्तमान मूल्य, बल्कि ऐतिहासिक मूल्य भी।

धन्यवाद।

Answer 1

ऐतिहासिक मुश्किल हो रहा है। आर के लिए quantmod पैकेज getQuote है जो yahooQF के साथ आपको वर्तमान मूल्यों को प्राप्त करने की आवश्यकता होगी।

require("quantmod") 
getQuote("GS", what = yahooQF(c("Market Capitalization", "Earnings/Share", 
     "P/E Ratio", "Book Value", "EBITDA", "52-week Range"))) 

      Trade Time Market Capitalization Earnings/Share P/E Ratio Book Value EBITDA 52-week Range 
GS 2012-06-21 04:00:00    47.870B   6.764  14.27 134.476  0 84.27 - 139.25 

इसके अलावा,

getQuote("GS", what=yahooQF()) 

कोशिश जो तुम क्या अनुरोध करने के लिए क्षेत्रों के लिए विकल्प की एक मेनू दे देंगे।

आप getFinancials

साथ Google वित्त से हाल के वित्तीय विवरण प्राप्त कर सकते हैं वहाँ भी है FinancialInstrument पैकेज है जो (इस मामले में शेयरों) उपकरणों के बारे में मेटाडेटा डाउनलोड करने के लिए कई update_instruments.* कार्य करती है। उदाहरण के लिए, यहाँ क्या याहू करता

require("FinancialInstrument") 
stock("GS", currency("USD")) # define the stock 
#[1] "GS" 
update_instruments.yahoo("GS") #update with yahoo 
#[1] "GS" 
getInstrument("GS") 
#primary_id   :"GS" 
#currency   :"USD" 
#multiplier   :1 
#tick_size   :0.01 
#identifiers   : list() 
#type    :"stock" 
#name    :"Goldman Sachs Gro" 
#exchange   :"NYSE" 
#market.cap   :"47.870B" 
#avg.volume   :5480530 
#EPS     :6.76 
#EPS.current.year.est:11.4 
#EPS.next.year.est :12.9 
#book.value   :134 
#EBITDA    :0 
#range.52wk   :"84.27 - 139.25" 
#defined.by   :"yahoo" 
#updated    : POSIXct, format: "2012-06-21 19:31:11" 

आप एक InteractiveBrokers खाता है, तो आप बकाया IBrokers पैकेज का उपयोग कर सकते हैं उपकरणों के बहुत सारे के बारे में जानकारी के बहुत सारे पाने के लिए है। इसके अलावा, यदि आपके पास एक आईबी खाता है तो आप मेरे twsInstrument पैकेज को देखना चाहेंगे जिसमें बहुत से सुविधा कार्य हैं।

Answer 2

बस मेरे सवाल का जवाब देने के लिए वेबसाइट हिस्सा:

str <- paste("http://investing.money.msn.com/investments/company-report?symbol=", ticker, sep = "") 
    page <- paste(readLines(url(str, open = "rt")), collapse = "\n") 
    match <- regexpr("<a href=\"http://www\\.(\\S+)\">Website</a>", page, perl = TRUE) 

    if (attr(match, "match.length") > 0) { 
    site <- substring(page, attr(match, "capture.start"), attr(match, "capture.start") + attr(match, "capture.length") - 1)  
    site <- strsplit(site, "/")[[1]][1] 
    }