शुरू करेंमुफ़्त में शुरू करें

Reproducible lottery परिणाम

आप एक ऑनलाइन लॉटरी के लिए प्रोग्रामर के तौर पर काम करते हैं. कानूनन, विजेताओं का चयन रैंडम होना चाहिए और चयन प्रक्रिया पारदर्शी होनी चाहिए.

आपके workspace में लॉटरी टिकटों की एक सूची ls_tickets है. ls_tickets में 51 एलिमेंट हैं, हर US राज्य के लिए एक. इस सूची के हर एलिमेंट में लॉटरी टिकट नंबर हैं. आपके workspace में एक फंक्शन lottery() भी है, जो हर राज्य के लिए रैंडम तरीके से विजेता टिकट चुनता है. आप lottery() फंक्शन को ls_tickets पर parallel में future_map() का उपयोग करके टेस्ट कर रहे हैं. समस्या यह है कि हर बार कोड चलाने पर विजेता बदल जाते हैं. आपके लिए furrr पैकेज पहले से लोड किया गया है.

यह अभ्यास पाठ्यक्रम का हिस्सा है

R में पैरेलल प्रोग्रामिंग

पाठ्यक्रम देखें

अभ्यास निर्देश

  • future_map() के लिए एक configuration बनाइए.
  • configuration में seed को 4321 पर सेट कीजिए.
  • इस configuration को future_map() को दीजिए.

इंटरैक्टिव व्यावहारिक अभ्यास

इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।

lottery <- function(tickets) {
  sample(tickets, 1)
}

# Create a configuration for future_map()
config <- ___(
# Provide the seed 4321 to the correct argument   
  ___ = ___)

plan(multisession, workers = 4)
winners <- future_map(ls_tickets, lottery,
                      # Supply configuration to future_map()
                      ___ = ___)

plan(sequential)
कोड संपादित करें और चलाएँ