setwd( "C:/Users/Jerome/Documents/Data_Science_110/Datasets")
library(tidyverse)
## -- Attaching packages ----------------------------------------------------------------------------------------------- tidyverse 1.3.0 --
## v ggplot2 3.3.2 v purrr 0.3.4
## v tibble 3.0.1 v dplyr 1.0.0
## v tidyr 1.1.0 v stringr 1.4.0
## v readr 1.3.1 v forcats 0.5.0
## -- Conflicts -------------------------------------------------------------------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag() masks stats::lag()
Week_4_MoCo <-read.csv("Week_4_MoCo.csv")
##install.packages("gmodels")
library(gmodels)
## Warning: package 'gmodels' was built under R version 4.0.2
Week_4_MoCo <-read.csv("Week_4_MoCo.csv")
CrossTable(Week_4_MoCo$Grad_Rate, Week_4_MoCo$Predom_Race)
##
##
## Cell Contents
## |-------------------------|
## | N |
## | Chi-square contribution |
## | N / Row Total |
## | N / Col Total |
## | N / Table Total |
## |-------------------------|
##
##
## Total Observations in Table: 25
##
##
## | Week_4_MoCo$Predom_Race
## Week_4_MoCo$Grad_Rate | Black | Black/Hispanic | Even | Hispanic/Latinx | White | Row Total |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 74 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 77.2 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 79.3 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 80.6 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 81.7 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 83.7 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 85 | 0 | 1 | 0 | 0 | 0 | 1 |
## | 0.080 | 10.580 | 0.120 | 0.360 | 0.360 | |
## | 0.000 | 1.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.500 | 0.000 | 0.000 | 0.000 | |
## | 0.000 | 0.040 | 0.000 | 0.000 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 85.3 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 85.4 | 0 | 1 | 0 | 0 | 0 | 1 |
## | 0.080 | 10.580 | 0.120 | 0.360 | 0.360 | |
## | 0.000 | 1.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.500 | 0.000 | 0.000 | 0.000 | |
## | 0.000 | 0.040 | 0.000 | 0.000 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 86.6 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 86.7 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 87.9 | 1 | 0 | 0 | 0 | 0 | 1 |
## | 10.580 | 0.080 | 0.120 | 0.360 | 0.360 | |
## | 1.000 | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.500 | 0.000 | 0.000 | 0.000 | 0.000 | |
## | 0.040 | 0.000 | 0.000 | 0.000 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 90.2 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 90.4 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 91.3 | 0 | 0 | 1 | 0 | 0 | 1 |
## | 0.080 | 0.080 | 6.453 | 0.360 | 0.360 | |
## | 0.000 | 0.000 | 1.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.333 | 0.000 | 0.000 | |
## | 0.000 | 0.000 | 0.040 | 0.000 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 91.6 | 1 | 0 | 0 | 0 | 0 | 1 |
## | 10.580 | 0.080 | 0.120 | 0.360 | 0.360 | |
## | 1.000 | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.500 | 0.000 | 0.000 | 0.000 | 0.000 | |
## | 0.040 | 0.000 | 0.000 | 0.000 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 92.4 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 93.2 | 0 | 0 | 1 | 0 | 0 | 1 |
## | 0.080 | 0.080 | 6.453 | 0.360 | 0.360 | |
## | 0.000 | 0.000 | 1.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.333 | 0.000 | 0.000 | |
## | 0.000 | 0.000 | 0.040 | 0.000 | 0.000 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 93.9 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 94.9 | 0 | 0 | 1 | 0 | 1 | 2 |
## | 0.160 | 0.160 | 2.407 | 0.720 | 0.109 | |
## | 0.000 | 0.000 | 0.500 | 0.000 | 0.500 | 0.080 |
## | 0.000 | 0.000 | 0.333 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.040 | 0.000 | 0.040 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 95 | 0 | 0 | 0 | 0 | 4 | 4 |
## | 0.320 | 0.320 | 0.480 | 1.440 | 4.551 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.160 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.444 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.160 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## Column Total | 2 | 2 | 3 | 9 | 9 | 25 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 0.360 | |
## ----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
##
##
CrossTable(Week_4_MoCo$FARMS_Rate, Week_4_MoCo$Predom_Race)
##
##
## Cell Contents
## |-------------------------|
## | N |
## | Chi-square contribution |
## | N / Row Total |
## | N / Col Total |
## | N / Table Total |
## |-------------------------|
##
##
## Total Observations in Table: 25
##
##
## | Week_4_MoCo$Predom_Race
## Week_4_MoCo$FARMS_Rate | Black | Black/Hispanic | Even | Hispanic/Latinx | White | Row Total |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 2 | 0 | 0 | 1 | 0 | 0 | 1 |
## | 0.080 | 0.080 | 6.453 | 0.360 | 0.360 | |
## | 0.000 | 0.000 | 1.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.333 | 0.000 | 0.000 | |
## | 0.000 | 0.000 | 0.040 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 5 | 0 | 0 | 0 | 0 | 2 | 2 |
## | 0.160 | 0.160 | 0.240 | 0.720 | 2.276 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.080 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.222 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.080 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 5.2 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 7.3 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 7.4 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 10.2 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 15.7 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 15.8 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 21.6 | 0 | 0 | 0 | 0 | 1 | 1 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 1.138 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 1.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.111 | |
## | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 22.1 | 0 | 0 | 1 | 0 | 0 | 1 |
## | 0.080 | 0.080 | 6.453 | 0.360 | 0.360 | |
## | 0.000 | 0.000 | 1.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.333 | 0.000 | 0.000 | |
## | 0.000 | 0.000 | 0.040 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 24.1 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 33 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 33.3 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 35.5 | 1 | 0 | 0 | 0 | 0 | 1 |
## | 10.580 | 0.080 | 0.120 | 0.360 | 0.360 | |
## | 1.000 | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.500 | 0.000 | 0.000 | 0.000 | 0.000 | |
## | 0.040 | 0.000 | 0.000 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 36 | 1 | 0 | 0 | 0 | 0 | 1 |
## | 10.580 | 0.080 | 0.120 | 0.360 | 0.360 | |
## | 1.000 | 0.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.500 | 0.000 | 0.000 | 0.000 | 0.000 | |
## | 0.040 | 0.000 | 0.000 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 36.3 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 37 | 0 | 0 | 1 | 0 | 0 | 1 |
## | 0.080 | 0.080 | 6.453 | 0.360 | 0.360 | |
## | 0.000 | 0.000 | 1.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.333 | 0.000 | 0.000 | |
## | 0.000 | 0.000 | 0.040 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 37.9 | 0 | 1 | 0 | 0 | 0 | 1 |
## | 0.080 | 10.580 | 0.120 | 0.360 | 0.360 | |
## | 0.000 | 1.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.500 | 0.000 | 0.000 | 0.000 | |
## | 0.000 | 0.040 | 0.000 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 43.6 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 46.9 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 48 | 0 | 1 | 0 | 0 | 0 | 1 |
## | 0.080 | 10.580 | 0.120 | 0.360 | 0.360 | |
## | 0.000 | 1.000 | 0.000 | 0.000 | 0.000 | 0.040 |
## | 0.000 | 0.500 | 0.000 | 0.000 | 0.000 | |
## | 0.000 | 0.040 | 0.000 | 0.000 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 49.7 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 50 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## 50.5 | 0 | 0 | 0 | 1 | 0 | 1 |
## | 0.080 | 0.080 | 0.120 | 1.138 | 0.360 | |
## | 0.000 | 0.000 | 0.000 | 1.000 | 0.000 | 0.040 |
## | 0.000 | 0.000 | 0.000 | 0.111 | 0.000 | |
## | 0.000 | 0.000 | 0.000 | 0.040 | 0.000 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
## Column Total | 2 | 2 | 3 | 9 | 9 | 25 |
## | 0.080 | 0.080 | 0.120 | 0.360 | 0.360 | |
## -----------------------|-----------------|-----------------|-----------------|-----------------|-----------------|-----------------|
##
##
##library(ggplot2)
##Week_4_MoCo <- read.csv ("Week_4_MoCo.csv")
# Scatter plot with correlation coefficient
#:::::::::::::::::::::::::::::::::::::::::::::::::
##MoCoPlot <- ggplot(Week_4_MoCo, aes(FARMS_Rate, Grad_Rate,)) + geom_point()
# print(MoCoPlot + ggtitle("FARMS_Rate vs. Grad_Rate MoCo High Schools 2018-19"))
##title(main = "FARMS_Rate vs. Grad_Rate MoCo High Schools 2018-19")
# Add correlation coefficient
#sp + stat_cor(p.accuracy = 0.001, r.accuracy = 0.01)
# `geom_smooth()` using formula 'y ~ x'