29 lines
966 B
R
29 lines
966 B
R
#!/usr/bin/env Rscript
|
|
|
|
|
|
|
|
setwd( paste(this.path::initwd,'/../',sep='') )
|
|
source('src/masterset.r')
|
|
|
|
|
|
|
|
#--------[ Load Data Sets]--------#
|
|
masterset_load('data/regional/united-states/meta/us-counties.json')
|
|
masterset_load('data/regional/united-states/economics/income/us-income-individual-mean-2019.json')
|
|
masterset_load('data/regional/united-states/education/us-education-bachelor-2019.json')
|
|
masterset_load('data/regional/united-states/technology/us-technology-broadband-2019.json')
|
|
masterset_load('data/regional/united-states/demographics/race/us-race-black-2019.json')
|
|
|
|
|
|
|
|
#--------[ Create Graph ]--------#
|
|
masterset_graph_init( g_plab = 'Education vs. Income Per-Capita')
|
|
|
|
masterset_graph_points(
|
|
g_xvar = masterset$us.education.bachelor.2019,
|
|
g_yvar = masterset$us.income.individual.mean.2019,
|
|
g_col = masterset$us.technology.broadband.2019,
|
|
g_size = masterset$us.race.black.2019
|
|
)
|
|
|
|
masterset_graph_save( 'examples/regional-us-education-income.svg' )
|