कॉरपोरेट ऐक्शंस के लिए समायोजन

R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

Joshua Ulrich

Quantitative Analyst & quantmod Co-Author and Maintainer

स्टॉक स्प्लिट और डिविडेंड के लिए समायोजन (1)

getSymbols("MSFT", from = "2004-07-01", to = "2004-12-31")

"MSFT"

# स्प्लिट और डिविडेंड के लिए डेटा समायोजित करें
msft_adjusted <- adjustOHLC(MSFT)

# ऑब्जेक्ट का नाम टिकर सिंबल नहीं है
my_data <- MSFT

# symbol.name आर्ग्यूमेंट का उपयोग करें
my_data_adjusted <- adjustOHLC(my_data, symbol.name = "MSFT")
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

स्टॉक स्प्लिट और डिविडेंड के लिए समायोजन (2)

R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन
# Yahoo Finance से स्प्लिट डेटा डाउनलोड करें
splits <- getSplits("GE")
head(splits, n = 4)

           GE.spl
1971-06-08    0.5
1983-06-02    0.5
1987-05-26    0.5
1994-05-16    0.5

# Yahoo Finance से स्प्लिट-एडजस्टेड डिविडेंड डाउनलोड करें
dividends <- getDividends("GE")
head(dividends, n = 4)

            GE.div
1970-03-03 0.00677
1970-06-11 0.00677
1970-09-21 0.00677
1970-12-07 0.00677
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

अनएडजस्टेड डिविडेंड डाउनलोड करें

# Yahoo Finance से अनएडजस्टेड डिविडेंड डाउनलोड करें
dividends_raw <- getDividends("GE", split.adjust = FALSE)

# एडजस्टेड और अनएडजस्टेड डिविडेंड की तुलना करें
head(merge(dividends, dividends_raw))

            GE.div GE.div.1
1970-03-03 0.00677  0.64992
1970-06-11 0.00677  0.64992
1970-09-21 0.00677  0.64992
1970-12-07 0.00677  0.64992
1971-03-03 0.00677  0.64992
1971-06-17 0.00729  0.34992
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

adjRatios()

  • किसी भी सीरीज़ को स्प्लिट, डिविडेंड, या दोनों के लिए बैक-एडजस्ट करें
  • 3 आर्ग्यूमेंट हैं:
    • splits
    • dividends
    • close
  • xts ऑब्जेक्ट लौटाता है जिसमें 2 कॉलम हैं: Split और Div
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

यूनिवेरिएट सीरीज़ को स्प्लिट और डिविडेंड के लिए एडजस्ट करें

getSymbols("GE", from = "2000-01-01")

"GE"

close <- Cl(GE)
splits <- getSplits("GE")
dividends_raw <- getDividends("GE", split.adjust = FALSE)

# स्प्लिट, अनएडजस्टेड डिविडेंड, और अनएडजस्टेड क्लोज़ पास करें
ratios <- adjRatios(splits = splits,
               dividends = dividends_raw, 
               close = close)
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

यूनिवेरिएट सीरीज़ को स्प्लिट और डिविडेंड के लिए एडजस्ट करें

# अनएडजस्टेड क्लोज़ को स्प्लिट और डिविडेंड रेशियो से गुणा करें
close_adjusted <- close * ratios[, "Split"] * ratios[, "Div"]

head(merge(close, close_adjusted, Ad(GE)), n = 4)

           GE.Close GE.Close.1 GE.Adjusted
2000-01-03 150.0000   29.50422    29.44630
2000-01-04 144.0000   28.32405    28.26845
2000-01-05 143.7500   28.27488    28.21937
2000-01-06 145.6718   28.65289    28.59664
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

अभ्यास करते हैं!

R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन

Preparing Video For Download...