Відтворюваний бутстреп
Ви працюєте в онлайн-брокерській компанії. Ваша фірма розробляє застосунок для Android, який надає загальні діапазони цін для акцій, що продаються компанією. Для обчислення місячних діапазонів цін у вас є функція бутстрепу boot_price().
Щоб перевірити відтворюваність цієї функції в паралельному режимі, ви вирішили застосувати її до кожного елемента списку ls_micro. Кожен елемент цього списку — це вектор середніх щоденних цін акцій Microsoft за певний місяць.
Пакет parallel уже підключено для вас.
Ця вправа є частиною курсу
Паралельне програмування в R
Інструкції до вправи
- Встановіть значення зерна
321для кластераcl1, щоб виконати перший запуск. - Встановіть те саме значення зерна для кластера
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
___(___, ___)