View source: R/sitepickR_diagnostics.R
unitLovePlot | R Documentation |
Balance between initially sampled units and all units in the population
unitLovePlot( smOut, title = "Standardized Mean Difference", subtitle = "Initially Selected Units vs. Population" )
smOut |
list; selectMatch() output |
title |
character; user-specified figure title |
subtitle |
character; user-specified figure subtitle |
ggplot object
################################################################################ ############## Balance Diagnostics [sitepickR Package] ######################### ######### Robert Olsen, Elizabeth A. Stuart & Elena Badillo-Goicoechea (2022) ## ################################################################################ # Basic usage of unitLovePlot() rawCCD <- sitepickR::rawCCD uSampVarsCCD <- c("w.pct.frlunch", "w.pct.black", "w.pct.hisp", "w.pct.female") suSampVarsCCD <- c("sch.pct.frlunch", "sch.pct.black", "sch.pct.hisp", "sch.pct.female") dfCCD <- prepDF(rawCCD, unitID="LEAID", subunitID="NCESSCH") dfCCD <- dplyr::filter(dfCCD, unitID %in% unique(dfCCD$unitID)[1:80]) smOut <- selectMatch(df = dfCCD, # user dataset unitID = "LEAID", # column name of unit ID in user dataset subunitID = "NCESSCH", # column name of sub-unit ID in user dataset unitVars = uSampVarsCCD, # name of unit level covariate columns subunitSampVars = suSampVarsCCD, # name of sub-unit level covariate columns nUnitSamp = 30, nRepUnits = 5, nsubUnits = 2 ) unitLovePlot(smOut)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.