Results
Andrew Heiss, Marc Dotson, and Suparna Chaudhry
Last run: 2019-05-16
library(tidyverse)
library(donorheuristics)
library(ggraph)
library(ggdag)
library(here)
# General settings
source(here("analysis", "options.R"))
# Make all the randomness reproducible
set.seed(1234)
# Load data
# results <- readRDS(here("data", "derived_data", "results.rds"))Causal pathway
Our theory and hypotheses are laid out in the causal pathway below. Organizational factors (O, or organizational practices like financial disclosure and accountability practices; I, or issue area; and F, or funding) all influence the decision to donate (D). Structural factors like an NGO’s relationship with its host government (G) also influence donation behavior, but the relationship itself is shaped by both funding and issue area.
node_colors <- tribble(
~name, ~type,
"D", "Outcome",
"I", "Organizational factor",
"F", "Organizational factor",
"O", "Organizational factor",
"G", "Structural factor"
)
# Set up DAG structure
theory_dag <- dagify(D ~ I + F + O + G,
G ~ I + F,
outcome = "D",
exposure = "C") %>%
tidy_dagitty(layout = "dh", seed = 1234)
# Add node types/colors to DAG data
theory_dag$data <- theory_dag$data %>%
left_join(node_colors, by = "name")
# Make DAG plot
plot_dag <- ggplot(theory_dag, aes(x = x, y = y, xend = xend, yend = yend)) +
geom_dag_point(size = 6, mapping = aes(color = type)) +
geom_dag_edges(start_cap = circle(4, "mm"),
end_cap = circle(4, "mm")) +
geom_dag_text(size = pts(6), family = "Roboto Condensed", fontface = "bold") +
scale_dag() +
theme_ngo() +
theme(panel.grid = element_blank(),
panel.border = element_blank(),
axis.title = element_blank(),
axis.text = element_blank())
# Show and save plot
plot_dag
Original computing environment
## # http://dirk.eddelbuettel.com/blog/2017/11/27/#011_faster_package_installation_one
## VER=
## CCACHE=ccache
## CC=$(CCACHE) gcc$(VER)
## CXX=$(CCACHE) g++$(VER)
## CXXFLAGS=-O3 -Wno-unused-variable -Wno-unused-function -Wno-unused-local-typedefs
## CXX11=$(CCACHE) g++$(VER)
## CXX14=$(CCACHE) g++$(VER)
## FLIBS = -L`gfortran -print-file-name=libgfortran.dylib | xargs dirname`
## FC=$(CCACHE) gfortran$(VER)
## F77=$(CCACHE) gfortran$(VER)## ─ Session info ──────────────────────────────────────────────────────────
## setting value
## version R version 3.6.0 (2019-04-26)
## os macOS Mojave 10.14.4
## system x86_64, darwin15.6.0
## ui X11
## language (EN)
## collate en_US.UTF-8
## ctype en_US.UTF-8
## tz America/Denver
## date 2019-05-16
##
## ─ Packages ──────────────────────────────────────────────────────────────
## package * version date lib
## assertthat 0.2.1 2019-03-21 [1]
## backports 1.1.4 2019-04-10 [1]
## base64enc 0.1-3 2015-07-28 [1]
## boot 1.3-22 2019-04-02 [1]
## broom 0.5.2 2019-04-07 [1]
## callr 3.2.0 2019-03-15 [1]
## cellranger 1.1.0 2016-07-27 [1]
## cli 1.1.0 2019-03-19 [1]
## colorspace 1.4-1 2019-03-18 [1]
## crayon 1.3.4 2017-09-16 [1]
## curl 3.3 2019-01-10 [1]
## dagitty 0.2-2 2016-08-26 [1]
## desc 1.2.0 2018-05-01 [1]
## devtools 2.0.2 2019-04-08 [1]
## digest 0.6.18 2018-10-10 [1]
## donorheuristics * 0.0.0.9000 2019-05-02 [1]
## dplyr * 0.8.1 2019-05-14 [1]
## evaluate 0.13 2019-02-12 [1]
## farver 1.1.0 2018-11-20 [1]
## forcats * 0.4.0 2019-02-17 [1]
## fs 1.3.1 2019-05-06 [1]
## generics 0.0.2 2018-11-29 [1]
## ggdag * 0.1.0 2018-03-27 [1]
## ggforce 0.2.2 2019-04-23 [1]
## ggplot2 * 3.1.1 2019-04-07 [1]
## ggraph * 1.0.2 2018-07-07 [1]
## ggrepel 0.8.0 2018-05-09 [1]
## glue 1.3.1 2019-03-12 [1]
## gridExtra 2.3 2017-09-09 [1]
## gtable 0.3.0 2019-03-25 [1]
## haven 2.1.0 2019-02-19 [1]
## here * 0.1 2017-05-28 [1]
## hms 0.4.2 2018-03-10 [1]
## htmltools 0.3.6 2017-04-28 [1]
## httr 1.4.0 2018-12-11 [1]
## igraph 1.2.4.1 2019-04-22 [1]
## jsonlite 1.6 2018-12-07 [1]
## knitr 1.22 2019-03-08 [1]
## labeling 0.3 2014-08-23 [1]
## lattice 0.20-38 2018-11-04 [1]
## lazyeval 0.2.2 2019-03-15 [1]
## lubridate 1.7.4 2018-04-11 [1]
## magrittr 1.5 2014-11-22 [1]
## MASS 7.3-51.4 2019-03-31 [1]
## memoise 1.1.0 2017-04-21 [1]
## modelr 0.1.4 2019-02-18 [1]
## munsell 0.5.0 2018-06-12 [1]
## nlme 3.1-139 2019-04-09 [1]
## pander 0.6.3 2018-11-06 [1]
## pillar 1.4.0 2019-05-11 [1]
## pkgbuild 1.0.3 2019-03-20 [1]
## pkgconfig 2.0.2 2018-08-16 [1]
## pkgload 1.0.2 2018-10-29 [1]
## plyr 1.8.4 2016-06-08 [1]
## polyclip 1.10-0 2019-03-14 [1]
## prettyunits 1.0.2 2015-07-13 [1]
## processx 3.3.1.9000 2019-05-14 [1]
## ps 1.3.0 2018-12-21 [1]
## purrr * 0.3.2 2019-03-15 [1]
## R6 2.4.0 2019-02-14 [1]
## RColorBrewer 1.1-2 2014-12-07 [1]
## Rcpp 1.0.1 2019-03-17 [1]
## readr * 1.3.1 2018-12-21 [1]
## readxl 1.3.1 2019-03-13 [1]
## remotes 2.0.4 2019-04-10 [1]
## rlang 0.3.4 2019-04-07 [1]
## rmarkdown 1.12 2019-03-14 [1]
## rprojroot 1.3-2 2018-01-03 [1]
## rstudioapi 0.10 2019-03-19 [1]
## rvest 0.3.3 2019-04-11 [1]
## scales 1.0.0.9000 2019-05-10 [1]
## sessioninfo 1.1.1 2018-11-05 [1]
## stringi 1.4.3 2019-03-12 [1]
## stringr * 1.4.0 2019-02-10 [1]
## testthat 2.1.1 2019-04-23 [1]
## tibble * 2.1.1 2019-03-16 [1]
## tidygraph 1.1.2 2019-02-18 [1]
## tidyr * 0.8.3 2019-03-01 [1]
## tidyselect 0.2.5 2018-10-11 [1]
## tidyverse * 1.2.1 2017-11-14 [1]
## tweenr 1.0.1 2018-12-14 [1]
## usethis 1.5.0 2019-04-07 [1]
## V8 2.2 2019-04-13 [1]
## viridis 0.5.1 2018-03-29 [1]
## viridisLite 0.3.0 2018-02-01 [1]
## withr 2.1.2 2018-03-15 [1]
## xfun 0.7 2019-05-14 [1]
## xml2 1.2.0 2018-01-24 [1]
## yaml 2.2.0 2018-07-25 [1]
## source
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## local
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## Github (r-pkgs/processx@505cb1f)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## Github (r-lib/scales@7f6f4a5)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
## CRAN (R 3.6.0)
##
## [1] /Library/Frameworks/R.framework/Versions/3.6/Resources/libraryLS0tCnRpdGxlOiAiUmVzdWx0cyIKYXV0aG9yOiAiQW5kcmV3IEhlaXNzLCBNYXJjIERvdHNvbiwgYW5kIFN1cGFybmEgQ2hhdWRocnkiCmRhdGU6ICJMYXN0IHJ1bjogYHIgZm9ybWF0KFN5cy50aW1lKCksICclRicpYCIKb3V0cHV0OiAKICBodG1sX2RvY3VtZW50OgogICAgY29kZV9mb2xkaW5nOiBoaWRlCiAgICBwYW5kb2NfYXJnczoKICAgICAgLSAiLS1kZWZhdWx0LWltYWdlLWV4dGVuc2lvbj1wbmciCmVkaXRvcl9vcHRpb25zOiAKICBjaHVua19vdXRwdXRfdHlwZTogY29uc29sZQotLS0KCmBgYHtyIGxvYWQtbGlicmFyaWVzLWRhdGEsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2U9RkFMU0V9CmxpYnJhcnkodGlkeXZlcnNlKQpsaWJyYXJ5KGRvbm9yaGV1cmlzdGljcykKbGlicmFyeShnZ3JhcGgpCmxpYnJhcnkoZ2dkYWcpCmxpYnJhcnkoaGVyZSkKCiMgR2VuZXJhbCBzZXR0aW5ncwpzb3VyY2UoaGVyZSgiYW5hbHlzaXMiLCAib3B0aW9ucy5SIikpCgojIE1ha2UgYWxsIHRoZSByYW5kb21uZXNzIHJlcHJvZHVjaWJsZQpzZXQuc2VlZCgxMjM0KQoKIyBMb2FkIGRhdGEKIyByZXN1bHRzIDwtIHJlYWRSRFMoaGVyZSgiZGF0YSIsICJkZXJpdmVkX2RhdGEiLCAicmVzdWx0cy5yZHMiKSkKYGBgCgoKIyBDYXVzYWwgcGF0aHdheQoKT3VyIHRoZW9yeSBhbmQgaHlwb3RoZXNlcyBhcmUgbGFpZCBvdXQgaW4gdGhlIGNhdXNhbCBwYXRod2F5IGJlbG93LiBPcmdhbml6YXRpb25hbCBmYWN0b3JzICgqKk8qKiwgb3Igb3JnYW5pemF0aW9uYWwgcHJhY3RpY2VzIGxpa2UgZmluYW5jaWFsIGRpc2Nsb3N1cmUgYW5kIGFjY291bnRhYmlsaXR5IHByYWN0aWNlczsgKipJKiosIG9yIGlzc3VlIGFyZWE7IGFuZCAqKkYqKiwgb3IgZnVuZGluZykgYWxsIGluZmx1ZW5jZSB0aGUgZGVjaXNpb24gdG8gZG9uYXRlICgqKkQqKikuIFN0cnVjdHVyYWwgZmFjdG9ycyBsaWtlIGFuIE5HTydzIHJlbGF0aW9uc2hpcCB3aXRoIGl0cyBob3N0IGdvdmVybm1lbnQgKCoqRyoqKSBhbHNvIGluZmx1ZW5jZSBkb25hdGlvbiBiZWhhdmlvciwgYnV0IHRoZSByZWxhdGlvbnNoaXAgaXRzZWxmIGlzIHNoYXBlZCBieSBib3RoIGZ1bmRpbmcgYW5kIGlzc3VlIGFyZWEuIAoKYGBge3IgY2F1c2FsLWRhZywgZmlnLndpZHRoPTEzLzMsIGZpZy5oZWlnaHQ9Mn0Kbm9kZV9jb2xvcnMgPC0gdHJpYmJsZSgKICB+bmFtZSwgfnR5cGUsCiAgIkQiLCAiT3V0Y29tZSIsCiAgIkkiLCAiT3JnYW5pemF0aW9uYWwgZmFjdG9yIiwKICAiRiIsICJPcmdhbml6YXRpb25hbCBmYWN0b3IiLAogICJPIiwgIk9yZ2FuaXphdGlvbmFsIGZhY3RvciIsCiAgIkciLCAiU3RydWN0dXJhbCBmYWN0b3IiCikKCiMgU2V0IHVwIERBRyBzdHJ1Y3R1cmUKdGhlb3J5X2RhZyA8LSBkYWdpZnkoRCB+IEkgKyBGICsgTyArIEcsCiAgICAgICAgICAgICAgICAgICAgIEcgfiBJICsgRiwKICAgICAgICAgICAgICAgICAgICAgb3V0Y29tZSA9ICJEIiwKICAgICAgICAgICAgICAgICAgICAgZXhwb3N1cmUgPSAiQyIpICU+JSAKICB0aWR5X2RhZ2l0dHkobGF5b3V0ID0gImRoIiwgc2VlZCA9IDEyMzQpIAoKIyBBZGQgbm9kZSB0eXBlcy9jb2xvcnMgdG8gREFHIGRhdGEKdGhlb3J5X2RhZyRkYXRhIDwtIHRoZW9yeV9kYWckZGF0YSAlPiUgCiAgbGVmdF9qb2luKG5vZGVfY29sb3JzLCBieSA9ICJuYW1lIikKCiMgTWFrZSBEQUcgcGxvdApwbG90X2RhZyA8LSBnZ3Bsb3QodGhlb3J5X2RhZywgYWVzKHggPSB4LCB5ID0geSwgeGVuZCA9IHhlbmQsIHllbmQgPSB5ZW5kKSkgKwogIGdlb21fZGFnX3BvaW50KHNpemUgPSA2LCBtYXBwaW5nID0gYWVzKGNvbG9yID0gdHlwZSkpICsKICBnZW9tX2RhZ19lZGdlcyhzdGFydF9jYXAgPSBjaXJjbGUoNCwgIm1tIiksCiAgICAgICAgICAgICAgICAgZW5kX2NhcCA9IGNpcmNsZSg0LCAibW0iKSkgKwogIGdlb21fZGFnX3RleHQoc2l6ZSA9IHB0cyg2KSwgZmFtaWx5ID0gIlJvYm90byBDb25kZW5zZWQiLCBmb250ZmFjZSA9ICJib2xkIikgKwogIHNjYWxlX2RhZygpICsKICB0aGVtZV9uZ28oKSArCiAgdGhlbWUocGFuZWwuZ3JpZCA9IGVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBwYW5lbC5ib3JkZXIgPSBlbGVtZW50X2JsYW5rKCksCiAgICAgICAgYXhpcy50aXRsZSA9IGVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRleHQgPSBlbGVtZW50X2JsYW5rKCkpCgojIFNob3cgYW5kIHNhdmUgcGxvdApwbG90X2RhZwpnZ3NhdmUocGxvdF9kYWcsIGZpbGVuYW1lID0gaGVyZSgiYW5hbHlzaXMiLCAib3V0cHV0IiwgImZpZ3VyZXMiLCAiY2F1c2FsLXBhdGgucGRmIiksCiAgICAgICB3aWR0aCA9IDEzLzMsIGhlaWdodCA9IDIsIHVuaXRzID0gImluIiwgZGV2aWNlID0gY2Fpcm9fcGRmKQpnZ3NhdmUocGxvdF9kYWcsIGZpbGVuYW1lID0gaGVyZSgiYW5hbHlzaXMiLCAib3V0cHV0IiwgImZpZ3VyZXMiLCAiY2F1c2FsLXBhdGgucG5nIiksCiAgICAgICB3aWR0aCA9IDEzLzMsIGhlaWdodCA9IDIsIHVuaXRzID0gImluIiwgdHlwZSA9ICJjYWlybyIsIGRwaSA9IDMwMCkKYGBgCgoKIyBPcmlnaW5hbCBjb21wdXRpbmcgZW52aXJvbm1lbnQKCjxidXR0b24gZGF0YS10b2dnbGU9ImNvbGxhcHNlIiBkYXRhLXRhcmdldD0iI3Nlc3Npb25pbmZvIiBjbGFzcz0iYnRuIGJ0bi1wcmltYXJ5IGJ0bi1tZCBidG4taW5mbyI+SGVyZSdzIHdoYXQgd2UgdXNlZCB0aGUgbGFzdCB0aW1lIHdlIGJ1aWx0IHRoaXMgcGFnZTwvYnV0dG9uPgoKPGRpdiBpZD0ic2Vzc2lvbmluZm8iIGNsYXNzPSJjb2xsYXBzZSI+CgpgYGB7ciBzaG93LXNlc3Npb24taW5mbywgZWNobz1UUlVFLCB3aWR0aD0xMDB9CndyaXRlTGluZXMocmVhZExpbmVzKGZpbGUucGF0aChTeXMuZ2V0ZW52KCJIT01FIiksICIuUi9NYWtldmFycyIpKSkKCmRldnRvb2xzOjpzZXNzaW9uX2luZm8oKQpgYGAKCjwvZGl2PiAK