लिंग भेदभाव का रैंडमाइज़ेशन
याद कीजिए कि हम ऐसी स्थिति पर विचार कर रहे हैं जहाँ पुरुषों और महिलाओं की संख्या तय है (जो रेज़्यूमे दर्शाते हैं) और प्रोमोट किए गए लोगों की संख्या भी तय है (मैनेजर्स केवल 35 लोगों को प्रोमोट कर पाए)।
इस अभ्यास में, आप null स्टैटिस्टिक के लिए रैंडमाइज़ेशन डिस्ट्रीब्यूशन 1000 रिप्लिकेट्स के साथ बनाएँगे, जबकि पिछले अभ्यास में सिर्फ 5 थे। याद रहे, यहाँ रुचि का स्टैटिस्टिक जेंडर्स के बीच प्रोमोशन के अनुपातों का अंतर है (अर्थात पुरुषों का proportion माइनस महिलाओं का proportion)। मूल डेटासेट से, आप निकाल सकते हैं कि पुरुषों और महिलाओं के प्रोमोशन रेट्स में कितना फर्क है। infer में specify-hypothesis-generate-calculate वर्कफ़्लो का उपयोग करके, आप वही स्टैटिस्टिक निकाल सकते हैं, लेकिन एक संख्या के बजाय आपको पूरी डिस्ट्रीब्यूशन मिलती है। इस अभ्यास में, आप मूल डेटासेट से मिली उस एकल संख्या की तुलना सिमुलेशन से बनी डिस्ट्रीब्यूशन से करेंगे।
यह अभ्यास पाठ्यक्रम का हिस्सा है
R में Inference की बुनियाद
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Calculate the observed difference in promotion rate
diff_orig <- disc %>%
# Group by sex
group_by(___) %>%
# Summarize to calculate fraction promoted
___(prop_prom = ___(___)) %>%
# Summarize to calculate difference
___(stat = ___(___)) %>%
pull()
# See the result
diff_orig