Análisis pozos Huatabampo

Lectura de Datos de pozos de huatabampo

library(ggplot2)
library(plotly)

## 
## Attaching package: 'plotly'

## The following object is masked from 'package:ggplot2':
## 
##     last_plot

## The following object is masked from 'package:stats':
## 
##     filter

## The following object is masked from 'package:graphics':
## 
##     layout

huat = read.csv("huatabampo.csv",TRUE,",")

Creacion de la variable que almacena la grafica de barras usando las columnas de PPM y PH

yikes=ggplot(data = huat , aes(x = huat$PPM,y=huat$PH)) +
  geom_bar(stat = "identity",fill="blue4")+xlab("Partes Por millón")+ylab("PH del agua")+ggtitle("Acidez del agua en relación a las PPM")

Grafica interactiva de barra usando ggplotly

De la siguiente grafica se puede observar una pequeña área en donde se prueba que a menos partes por millón, mas PH en el agua de los pozos.