Bootstrap को पुनरुत्पादित करें
आप एक ऑनलाइन स्टॉक ब्रोकरेज में काम करते हैं. आपकी फर्म एक Android ऐप विकसित कर रही है जो फर्म द्वारा बेचे जाने वाले स्टॉक्स के लिए सामान्य प्राइस रेंज दिखाती है. मासिक प्राइस रेंज निकालने के लिए आपके पास एक bootstrapping फंक्शन boot_price() उपलब्ध है.
इस फंक्शन की parallel में reproducibility जाँचने के लिए, आपने इसे एक लिस्ट ls_micro के हर एलिमेंट पर लागू करने का निर्णय लिया है. इस लिस्ट का हर एलिमेंट किसी दिए गए महीने के लिए Microsoft के औसत दैनिक स्टॉक प्राइसेज़ का एक वेक्टर है.
parallel पैकेज आपके लिए लोड कर दिया गया है.
यह अभ्यास पाठ्यक्रम का हिस्सा है
R में पैरेलल प्रोग्रामिंग
अभ्यास निर्देश
- पहली रन के लिए
cl1क्लस्टर पर seed मान321सेट करें. - दूसरी रन के लिए वही seed मान
cl2क्लस्टर पर सेट करें. - जाँचें कि
result1औरresult2के आउटपुट समान हैं या नहीं.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
cl1 <- makeCluster(4)
# Set 321 as the seed value for the first run
___(___, ___)
result1 <- parLapply(cl1, ls_micro, boot_price)
stopCluster(cl1)
cl2 <- makeCluster(4)
# Set the same seed value for the second run
___(___, ___)
result2 <- parLapply(cl2, ls_micro, boot_price)
stopCluster(cl2)
# Test if outputs are the same
___(___, ___)