This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
library(tidyverse)
## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr 1.1.4 ✔ readr 2.1.5
## ✔ forcats 1.0.0 ✔ stringr 1.5.1
## ✔ ggplot2 4.0.0 ✔ tibble 3.3.0
## ✔ lubridate 1.9.4 ✔ tidyr 1.3.1
## ✔ purrr 1.1.0
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
library(readxl)
district<-read_xls("C:/Users/miche/OneDrive/Desktop/My Class Stuff/Wednesday Class/Homework 9.17.25/district.xls")
District2<-district %>% select(DPFEAOPFK,DA0CSA21R) %>% mutate(DA0CSA21R)
summary(District2)
## DPFEAOPFK DA0CSA21R
## Min. : 6755 Min. : -1.0
## 1st Qu.: 10916 1st Qu.: 887.0
## Median : 12228 Median : 973.0
## Mean : 13121 Mean : 823.9
## 3rd Qu.: 14012 3rd Qu.:1039.0
## Max. :178467 Max. :1344.0
## NA's :5 NA's :262
hist(District2$DPFEAOPFK)
hist(District2$DA0CSA21R)
plot(District2$DPFEAOPFK,District2$DA0CSA21R)
cor(District2$DPFEAOPFK,District2$DA0CSA21R)
## [1] NA