Importar archivos de Excel

setwd("~/Documents/pye1pm")
library(pacman)
p_load("readxl","DT")
pozos <- read_excel("pozos.xlsx")
datatable(pozos)

Histograma

Histograma del pH

hist(pozos$PH)

Gráfico de dispersión

plot(pozos$TEMP, pozos$PH)

pairs(pozos)

cor(pozos)
##               PH        TEMP
## PH    1.00000000 -0.02029087
## TEMP -0.02029087  1.00000000
summary(pozos)
##        PH            TEMP     
##  Min.   :6.10   Min.   :25.6  
##  1st Qu.:6.80   1st Qu.:28.0  
##  Median :6.90   Median :28.7  
##  Mean   :6.89   Mean   :28.7  
##  3rd Qu.:7.00   3rd Qu.:29.2  
##  Max.   :7.50   Max.   :32.1
summary(pozos$PH)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    6.10    6.80    6.90    6.89    7.00    7.50
boxplot(pozos$TEMP)