Propensity Score Article

[JoanneF1229]

What changes are proposed in this pull request?

• Adding an article illustrating how to preform propensity score analysis with the aid of the gtsummary package. This is an article and not a vignette that ships with the package to CRAN. It's available on the website only. (Propensity Score Analysis with gtsummary #1159)

If there is an GitHub issue associated with this pull request, please provide link.
closes #1159

---

Reviewer Checklist (if item does not apply, mark is as complete)

• Ensure all package dependencies are installed by running renv::install()
• PR branch has pulled the most recent updates from master branch. Ensure the pull request branch and your local version match and both have the latest updates from the master branch.
• If an update was made to tbl_summary(), was the same change implemented for tbl_svysummary()?
• If a new function was added, function included in _pkgdown.yml
• If a bug was fixed, a unit test was added for the bug check
• Run pkgdown::build_site(). Check the R console for errors, and review the rendered website.
• Code coverage is suitable for any new functions/features. Review coverage with withr::with_envvar(new = c("NOT_CRAN" = "true"), covr::report()). Begin in a fresh R session without any packages loaded.
• R CMD Check runs without errors, warnings, and notes
• usethis::use_spell_check() runs with no spelling errors in documentation

When the branch is ready to be merged into master:

• Update NEWS.md with the changes from this pull request under the heading "# gtsummary (development version)". If there is an issue associated with the pull request, reference it in parentheses at the end update (see NEWS.md for examples).
• Increment the version number using usethis::use_version(which = "dev")
• Run codemetar::write_codemeta()
• Run usethis::use_spell_check() again
• Approve Pull Request
• Merge the PR. Please use "Squash and merge".

[ddsjoberg]

1. Use nhefs from the package in https://github.com/NickCH-K/causaldata
2. Study question: do those who quit smoking gain weight.

lm(
  wt82_71~ qsmk + sex + race + age + I(age^2) + education +
    smokeintensity + smokeyrs + exercise + active + wt71,
  data = nhefs_complete_uc
)

3. Add this link as a reference https://github.com/LucyMcGowan/user2020-causal-inference
4. Can we add figures like this instead of the base R graphic from MatchIt.
   
5. Overall, I think linking to resources that have all the details, and keeping our mini tutorial as short as possible will be best.

[ddsjoberg]

@JoanneF1229 can you please update to not use library(tidyverse)? You can load the needed component packages instead.

[ddsjoberg]

I am going to go ahead and close this. We've had it open for a number of years, and if we were to merge it, I don't want to take the responsibility of maintaining it.

I think it's a valuable contribution. Perhaps there is another site where this could be hosted?