Patients with myocardial infarctions were assigned to one of four thrombolytic (clot-dissolving) treatments and then followed to determine 30-day mortality. The data are summarized in the table below:

	Survived	Died
Control Group: Standard Care	887	117
Group 1: t-PA and IV Heparin	967	79
Group 2: Streptokinase and IV Heparin	901	85
Group 3: t-PA, streptokinase, and IV Heparin	912	59

R CODING!

1. The following results were obtained using thechi-square function in R to perform all six pair-wise Tests.

------------------------------------------

> # Control vs. Group 1

> chisq.test(MI_Ctl_G1)

Pearson's Chi-squared test with Yates' continuity correction

data: MI_Ctl_G1

X-squared = 9.4944

------------------------------------------

> # Control vs. Group 2

> chisq.test(MI_Ctl_G2)

Pearson's Chi-squared test with Yates' continuity correction

data: MI_Ctl_G2

X-squared = 4.6895

------------------------------------------

> # Control vs. Group 3

> chisq.test(MI_Ctl_G3)

Pearson's Chi-squared test with Yates' continuity correction

data: MI_Ctl_G3

X-squared = 18.234

------------------------------------------

> # Group 1 vs. Group 2

> chisq.test(MI_G1_G2)

Pearson's Chi-squared test with Yates' continuity correction

data: MI_G1_G2

X-squared = 0.64312

------------------------------------------

> # Group 1 vs. Group 3

> chisq.test(MI_G1_G3)

Pearson's Chi-squared test with Yates' continuity correction

data: MI_G1_G3

X-squared = 1.4982

------------------------------------------

> # Group 2 vs. Group 3

> chisq.test(MI_G2_G3)

Pearson's Chi-squared test with Yates' continuity correction

data: MI_G2_G3

X-squared = 4.2807

Perform the appropriate multiple pairwise comparisons using the Holm correction to determine which treatments, if any, differ from the control (the Standard Care group). Present your final/overall conclusion on which treatment groups are different from the control (and which treatment groups are not different) using an overall level of significance of 0.05. Use the needed information from the R results that have been provided to do your calculations and assessments. (You may assume that all implementations in R have been done correctly.)