A caption

A caption

1: INTRODUCCION

El relleno sanitario es un método diseñado para la disposición final de la basura.

Este método consiste en depositar en el suelo los desechos sólidos, los cuales se esparcen y compactan reduciéndolos al menor volumen posible para que así ocupen un área pequeña. Luego se cubren con una capa de tierra y se compactan nuevamente al terminar el día.

2: PRINCIPIOS BASICOS DE UN RELLENO SANITARIO

El relleno debe contar con: ##### * Una buena compactación de los desechos sólidos, antes y después de cubrirlos con tierra. ##### * Cubrimiento diario de la basura con una capa de tierra o material similar. ##### * Controlar con drenajes y otras técnicas los líquidos o percolados y los gases que produce el relleno, para mantener las mejores condiciones de operación y proteger el ambiente. ##### * Evitar por medio de canales y drenajes que el agua de lluvia ingrese al relleno sanitario. ##### * Una supervisión constante, tanto de los administradores como de las organizaciones comunales.

knitr::include_graphics("D:/UNIVERSIDAD/2_2021/MODELACION_AMBIENTAL/MODULO_MULTIPARAMETRICO/TRABAJO/rSTUDIO/051.JPG")

3: OBJETIVO

El principal objetivo de esta investigación es poder observar y generar un lugar correcto para la construcción, operación, y abandono de un relleno sanitario en la comunidad de

4: MODULOS

4.1: Comunidad donde se quiere implementar un relleno sanitario

library(rgdal)
## Loading required package: sp
## rgdal: version: 1.5-23, (SVN revision 1121)
## Geospatial Data Abstraction Library extensions to R successfully loaded
## Loaded GDAL runtime: GDAL 3.2.1, released 2020/12/29
## Path to GDAL shared files: C:/Users/Usuario/Documents/R/win-library/4.1/rgdal/gdal
## GDAL binary built with GEOS: TRUE 
## Loaded PROJ runtime: Rel. 7.2.1, January 1st, 2021, [PJ_VERSION: 721]
## Path to PROJ shared files: C:/Users/Usuario/Documents/R/win-library/4.1/rgdal/proj
## PROJ CDN enabled: FALSE
## Linking to sp version:1.4-5
## To mute warnings of possible GDAL/OSR exportToProj4() degradation,
## use options("rgdal_show_exportToProj4_warnings"="none") before loading rgdal.
## Overwritten PROJ_LIB was C:/Users/Usuario/Documents/R/win-library/4.1/rgdal/proj
library(leaflet)
library(stars)
## Loading required package: abind
## Loading required package: sf
## Linking to GEOS 3.9.0, GDAL 3.2.1, PROJ 7.2.1
library(mapview)
library(ggplot2)

Municipio_Cliza <- readOGR("D:/UNIVERSIDAD/2_2021/MODELACION_AMBIENTAL/MODULO_MULTIPARAMETRICO/TRABAJO/SALIDAS/Cliza.shp", encoding = "UTF8", use_iconv = TRUE)
## OGR data source with driver: ESRI Shapefile 
## Source: "D:\UNIVERSIDAD\2_2021\MODELACION_AMBIENTAL\MODULO_MULTIPARAMETRICO\TRABAJO\SALIDAS\Cliza.shp", layer: "Cliza"
## with 1 features
## It has 4 fields
names(Municipio_Cliza)
## [1] "NOM_DEP"    "NOM_MUN"    "Estudiante" "area"
Municipio_Cliza$NOM_MUN
## [1] "Cliza"
 Cliza1 <- Municipio_Cliza[Municipio_Cliza$NOM_MUN == "Cliza1"]

plot(Cliza1)

paleta <- colorBin("YlOrRd", domain = Municipio_Cliza$area, bins = 2)

leaflet(Cliza1) %>%
  addProviderTiles(providers$CartoDB.Positron)%>%
  addPolygons(color = "#444444" ,
              weight = 1, 
              smoothFactor = 0.5,
              opacity = 1.0,
              fillOpacity = 0.5,
              label = Municipio_Cliza$area,
              fillColor = ~paleta(Cliza1$Area))%>%
  
  addLegend(position = "topright", pal = paleta, values = ~Cliza1$Area,
            title = "Superficie de la Comunidad de cliza en ha")

4.2: Relleno Sanitario

Segun datos proporcionados para el uso en arcgis, y siguiendo el documento del multicriterio, se determino el Suiguiente lugar como uno de los que más cumple con los criterios propuestos.+

library(rgdal)
library(leaflet)
library(stars)
library(mapview)
library(ggplot2)

Cochabamba <- readOGR("D:/UNIVERSIDAD/2_2021/MODELACION_AMBIENTAL/MODULO_MULTIPARAMETRICO/TRABAJO/SALIDAS/mayor_10ha.shp", 
                   encoding = "UTF8", use_iconv = TRUE)
## OGR data source with driver: ESRI Shapefile 
## Source: "D:\UNIVERSIDAD\2_2021\MODELACION_AMBIENTAL\MODULO_MULTIPARAMETRICO\TRABAJO\SALIDAS\mayor_10ha.shp", layer: "mayor_10ha"
## with 1 features
## It has 16 fields
## Integer64 fields read as strings:  OBJECTID ORIG_FID
names(Cochabamba)
##  [1] "OBJECTID"   "Cobertura"  "Shape_Leng" "Shape_Area" "GridCode"  
##  [6] "NoBio"      "DescBio"    "NoDispRH"   "DesDispRH"  "NoRiesgo"  
## [11] "AreaKm2"    "ORIG_FID"   "area"       "area_1"     "nombre"    
## [16] "nombre_1"
Cochabamba$nombre_1
## [1] "Cliza"
Cliza <- Cochabamba[Cochabamba$nombre_1 == "Cliza"]

plot(Cliza)

paleta <- colorBin("YlOrRd", domain = Cochabamba$OBJECTID, bins = 2)

leaflet(Cliza) %>%
  addProviderTiles(providers$CartoDB.Positron)%>%
  addPolygons(color = "#444444" ,
              weight = 1, 
              smoothFactor = 0.5,
              opacity = 1.0,
              fillOpacity = 0.5,
              label = Cochabamba$OBJECTID,
              fillColor = ~paleta(Cliza$AreaKm2))%>%
  
  addLegend(position = "topright", pal = paleta, values = ~Cliza$AreaKm2,
            title = "Superficie del posible lugar de relleno sanitario en ha")  
## Warning in paleta(Cliza$AreaKm2): Some values were outside the color scale and
## will be treated as NA

En el grafico se puede observar la posible zona en donde se construira, operara y se finaliza con el cierre y abandono del relleno sanitario, ya que es el unico lugar en el municipio de cliza que cumplio con los requisitos y condiciones necesarias para implementar un relleno.

5: CONCLUSIONES

Es importante la implementación de un relleno sanitario en las ciudades, es por ello que este debe cumplir con diversos criterios, como estar alejados de los centros poblados, estar en suelos especificos como ser con escaces de vegetación,y estar sercano a vias, para así tener acceso al lugar en si. en este caso la zona que cumpli con estas condiciones fue solo 1, esto sin considerar los acuiferos que estan en la comunidad ya que, en esta comunidad existe 2 acuiferos lo cual segun reglamento no es posible implementar un relleno encima de dichos acuiferos, es decir se decidio por el momento no incluir los acuiferos.