स्टेम सेल उपचार की प्रभावशीलता का आकलन (जारी)
कंट्रोल और ट्रीटमेंट समूहों में भेड़ों के दिल की पम्पिंग क्षमता के औसत में अंतर है या नहीं, इसका मूल्यांकन करने के लिए हाइपोथेसिस टेस्ट चलाएँ और p-value गणना करें।
चूँकि हम अंतर की जाँच कर रहे हैं, घटाने का क्रम मायने रखता है। आप इसे calculate() फंक्शन में order आर्ग्युमेंट से निर्दिष्ट कर सकते हैं। उदाहरण के लिए, group1 - group2 पाने के लिए order = c("group1", "group2") का उपयोग करें।
यह अभ्यास पाठ्यक्रम का हिस्सा है
R में संख्यात्मक डेटा के लिए Inference
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
n_replicates <- 1000
# Generate 1000 differences in means via randomization
diff_mean_ht <- stem.cell %>%
# y ~ x
specify(___ ~ ___) %>%
# Null = no difference between means
hypothesize(null = "___") %>%
# Shuffle labels 1000 times
generate(reps = ___, type = "___") %>%
# Calculate test statistic
calculate(stat = "___", order = c("esc", "___")