कई instruments को एक ऑब्जेक्ट में जोड़ें
एक तरीका यह है कि आप डेटा को एक नए environment में इम्पोर्ट करें. फिर आप eapply() का उपयोग करके उस environment के हर ऑब्जेक्ट पर कोई फंक्शन कॉल कर सकते हैं, ठीक उसी तरह जैसे lapply() किसी लिस्ट के प्रत्येक एलिमेंट पर करता है. lapply() की तरह, eapply() भी एक लिस्ट लौटाता है.
इसके बाद आप do.call() का उपयोग करके उस लिस्ट के सभी एलिमेंट्स को एक ऑब्जेक्ट में merge कर सकते हैं, जो ऐसा है मानो R आपके लिए प्रोग्रामेटिकली कमांड टाइप करके चला रहा हो. merge(my_list[[1]], my_list[[2]]], ...) टाइप करने के बजाय, आप do.call(merge, my_list) टाइप कर सकते हैं.
यह अभ्यास पाठ्यक्रम का हिस्सा है
R में वित्तीय डेटा का इम्पोर्ट और प्रबंधन
अभ्यास निर्देश
eapply()का उपयोग करकेdata_envके प्रत्येक ऑब्जेक्ट परhead()कॉल करें. परिणामdata_listमें असाइन करें.do.call()औरmerge()का उपयोग करकेdata_listके सभी एलिमेंट्स को जोड़कर एक xts ऑब्जेक्ट बनाएँ, जिसका नामdata_mergedहो.- क्योंकि environment में ऑब्जेक्ट्स ऑर्डर में नहीं होते, इस बात की गारंटी नहीं है कि
data_mergedके कॉलम्स किस क्रम में होंगे. उन्हें क्रम में लाने के लिएOHLC()का उपयोग करें और डेटा कोdata_ohlcमें स्टोर करें.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Call head on each object in data_env using eapply
data_list <- ___(data_env, ___)
# Merge all the data_list elements into one xts object
data_merged <- ___(___, data_list)
# Ensure the columns are ordered: open, high, low, close