fish_oil_18R Documentation

Findings on n-3 Fatty Acid Supplement Health Benefits

Description

The results summarize each of the health outcomes for an experiment where 12,933 subjects received a 1g fish oil supplement daily and 12,938 received a placebo daily. The experiment's duration was 5-years.

Usage

fish_oil_18

Format

The format is a list of 24 matrices. Each matrix is a 2x2 table, and below are the named items in the list, which also represent the outcomes.

major_cardio_event

Major cardiovascular event. (Primary end point.)

cardio_event_expanded

Cardiovascular event in expanded composite endpoint.

myocardioal_infarction

Total myocardial infarction. (Heart attack.)

stroke

Total stroke.

cardio_death

Death from cardiovascular causes.

PCI

Percutaneous coronary intervention.

CABG

Coronary artery bypass graft.

total_coronary_heart_disease

Total coronary heart disease.

ischemic_stroke

Ischemic stroke.

hemorrhagic_stroke

Hemorrhagic stroke.

chd_death

Death from coronary heart disease.

myocardial_infarction_death

Death from myocardial infraction.

stroke_death

Death from stroke.

invasive_cancer

Invasive cancer of any type. (Primary end point.)

breast_cancer

Breast cancer.

prostate_cancer

Prostate cancer.

colorectal_cancer

Colorectal cancer.

cancer_death

Death from cancer.

death

Death from any cause.

major_cardio_event_after_2y

Major cardiovascular event, excluding the first 2 years of follow-up.

myocardial_infarction_after_2y

Total myocardial infarction, excluding the first 2 years of follow-up.

invasive_cancer_after_2y

Invasive cancer of any type, excluding the first 2 years of follow-up.

cancer_death_after_2y

Death from cancer, excluding the first 2 years of follow-up.

death_after_2y

Death from any cause, excluding the first 2 years of follow-up.

Source

Manson JE, et al. 2018. Marine n-3 Fatty Acids and Prevention of Cardiovascular Disease and Cancer. NEJMoa1811403. doi:10.1056/NEJMoa1811403.

Examples


names(fish_oil_18)
(tab <- fish_oil_18[["major_cardio_event"]])
chisq.test(tab)
fisher.test(tab)

(tab <- fish_oil_18[["myocardioal_infarction"]])
chisq.test(tab)
fisher.test(tab)