EJAM/EJSCREEN comparisons - see results for 1 site after using ejscreen_vs_ejam()

Usage

ejscreen_vs_ejam_see1(
  vs,
  myvars = c("ejam_uniq_id", "pop", names_d),
  mysite = 1
)

Arguments

vs

output of ejscreen_vs_ejam() or ejscreen_vs()

myvars

optional to check just a subset of the colnames found in vs$EJAM and vs$EJSCREEN, such as these possible values:

myvars = "all" # all the indicators in the output tables, i.e., colnames(vs$EJAM)

myvars = "inboth" # just the ones in both (not NA values because EJAM or EJSCREEN did not report the indicator)

myvars = "bad" # just the ones in both where EJAM_shown and EJSCREEN_shown disagree

myvars = c(names_d, names_d_subgroups) or

myvars = grep("pctile", colnames(vs$EJAM), value = T)

mysite

rownumber corresponding to site of interest, among 1:nrow(vs$EJAM)

Value

a table showing one row per indicator, and columns like EJSCREEN, EJAM, ratio, etc., but see str() because it is a list in matrix form

Details

see also ejscreen_vs_ejam_1var_bysite() and ejscreen_vs_explain()

Examples

  mysite <- 9
  # \donttest{
  vs <- ejscreen_vs_ejam(testpoints_10, radius = 3)
#> 
#>  Starting ejscreenapi_plus()... 
#> Error in ejscreenapi(lon = lon, lat = lat, radius = radius, unit = unit,     wkid = wkid, fips = fips, shapefile = shapefile, namestr = namestr,     format_report_or_json = format_report_or_json, ipurl = ipurl,     report_every_n = report_every_n, save_when_report = save_when_report,     on_server_so_dont_save_files = on_server_so_dont_save_files,     drop_redundant_indicators = TRUE, verbose = verbose, getstatefromplacename = getstatefromplacename): API URL does not seem to be accessible
  ejscreen_vs_ejam_see1(vs, mysite = mysite, 
    myvars = colnames(vs$EJAM))[!is.na(vs$EJSCREEN[mysite, ]) , 1:2]
#> Error in ejscreen_vs_ejam_see1(vs, mysite = mysite, myvars = colnames(vs$EJAM)): could not find function "ejscreen_vs_ejam_see1"
  # }