Reprodukuj bootstrap

Pracuješ pro online obchodní platformu s cennými papíry. Firma vyvíjí Android aplikaci, která zobrazuje obecné cenové rozsahy akcií. K výpočtu měsíčních cenových rozsahů máš k dispozici bootstrappingovou funkci boot_price().

Abys otestoval/a reprodukovatelnost této funkce v paralelním prostředí, rozhodl/a ses ji aplikovat na každý prvek seznamu ls_micro. Každý prvek tohoto seznamu je vektor průměrných denních cen akcií Microsoftu za daný měsíc.

Balíček parallel je již načten.

Toto cvičení je součástí kurzu

Paralelní programování v R

Zobrazit kurz

Pokyny k cvičení

Nastav hodnotu seedu 321 pro cluster cl1 a proveď první běh.
Nastav stejnou hodnotu seedu pro cluster cl2 a proveď druhý běh.
Otestuj, zda jsou výstupy result1 a result2 totožné.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

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
___(___, ___)

Upravit a spustit kód