This is the code repository for the research paper:
Fitzgerald O, Dyer S, Zegers-Hochschild F, Keller, E, Adamson GD, Chambers GM. (forthcoming). Gender inequality and utilisation of assisted reproductive technology: an international cross-sectional and longitudinal analysis.
The data in the repository may be reused. To cite the original data source (UN, WB, ICMART), see the manuscript. If using the final linked dataset please cite the current work.
The following steps will reproduce the results present in the paper. Bear in mind that as part of the analysis consists of Markov Chain Monte Carlo base imputation running the full analysis at once can take several hours.
If you are using RStudio or another GUI reproducing the analysis step by step may be the preferred method. To do so, run these files in the order described below.
First, set up the environment (install required packages). We use the package renv for reproducibility of the package environment.
install.packages("renv")
renv::restore()
Set up the analysis dataset:
scripts/install_packages.R
scripts/create_data/art_data.R
scripts/create_data/art_data_plus_covariates.R
Exploratory data analysis:
nbs/eda.Rmd
Perform the imputation analysis and fit models to the results:
scripts/impute/impute_missing_data.R
nbs/models-imputed-data.Rmd
Fit models to the complete case data:
nbs/models-complete-cases.Rmd
Graph the fitted models (note the models are saved in models/:
scripts/model_results.R