Capstone_Dataset_Barnes

Capstone_Dataset <-read_csv("Capstone_Dataset.csv")

## Rows: 1184 Columns: 21
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr  (1): DISTNAME
## dbl (20): TOT_EXP, SSS_PROP, GCS_PROP, SS_PROP, CS_PROP, SSS_DA, GSC_DA, SS_...
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

cor(Capstone_Dataset$SSS_PROP,Capstone_Dataset$OVERALL_SCORE, method = "pearson")

## [1] 0.01323415

plot(Capstone_Dataset$SSS_PROP, Capstone_Dataset$OVERALL_SCORE)

model<-lm(Capstone_Dataset$SSS_PROP~Capstone_Dataset$OVERALL_SCORE, data=Capstone_Dataset)

summary(model)

## 
## Call:
## lm(formula = Capstone_Dataset$SSS_PROP ~ Capstone_Dataset$OVERALL_SCORE, 
##     data = Capstone_Dataset)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6842 -1.0822 -0.1994  0.9261 13.5851 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    2.457268   0.418452   5.872 5.58e-09 ***
## Capstone_Dataset$OVERALL_SCORE 0.002414   0.005305   0.455    0.649    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.685 on 1182 degrees of freedom
## Multiple R-squared:  0.0001751,  Adjusted R-squared:  -0.0006707 
## F-statistic: 0.2071 on 1 and 1182 DF,  p-value: 0.6492