Skip to content

Commit

Permalink
updated
Browse files Browse the repository at this point in the history
  • Loading branch information
@ambarja
ambarja committed Sep 18, 2023
1 parent cb5aded commit e906ae8
Show file tree
Hide file tree
Showing 9 changed files with 286 additions and 103 deletions.
3 changes: 0 additions & 3 deletions .vscode/settings.json
View file

This file was deleted.

51 changes: 13 additions & 38 deletions 01_requeriments.qmd
View file
Original file line number Diff line number Diff line change
Expand Up @@ -51,7 +51,8 @@ Un paquete en R es una colección organizada de funciones, datos y documentació
Estos son los paquetes que se utilizará durante todo flujo de trabajo 👇

::: {.grid}
::: {.g-col-12 .g-col-md-4 .col-lg-4}

::: {.g-col-12 .g-col-md-6 .col-lg-2}
```{=html}
<style>
.card {background-color:#ffffff26;}
Expand All @@ -62,71 +63,46 @@ Estos son los paquetes que se utilizará durante todo flujo de trabajo 👇
<h5 class="card-title">{tidyverse}</h5>
<div align='center'><img src='https://soka.gitlab.io/blog/post/2019-10-06-r-tidyverse-intro/images/hex-tidyverse.png' width='100px'align='center'></div>
<p class="card-text">Paquete que te permite hacer ciencia de datos.</p>
<a href="https://www.tidyverse.org/" class="btn btn-dark">Más información,clic aquí</a>
<center><a href="https://www.tidyverse.org/" class="btn btn-dark">Más información,clic aquí</a></center>
</div>
</div>
```
:::

::: {.g-col-12 .g-col-md-4 .col-lg-4}
::: {.g-col-12 .g-col-md-6 .col-lg-2}
```{=html}
<div class="card">
<div class="card-body">
<h5 class="card-title">{tidyterra}</h5>
<div align='center'><img src='https://dieghernan.github.io/tidyterra/logo.png' width='100px'align='center'></div>
<p class="card-text">Paquete que te permite manipular datos raster.</p>
<a href="https://dieghernan.github.io/tidyterra/articles/tidyterra.html" class="btn btn-dark">Más información,clic aquí</a>
<center><a href="https://dieghernan.github.io/tidyterra/articles/tidyterra.html" class="btn btn-dark">Más información,clic aquí</a></center>
</div>
</div>
```
:::

::: {.g-col-12 .g-col-md-4 .col-lg-4}
::: {.g-col-12 .g-col-md-6 .col-lg-2}
```{=html}
<div class="card">
<div class="card-body">
<h5 class="card-title">{cloudml}</h5>
<div align='center'><img src='https://raw.githubusercontent.com/rstudio/cloudml/main/vignettes/images/cloudml.png' width='115px'align='center'></div>
<p class="card-text">Paquete que te permite instalar y utilizar GCloud CLI.</p>
<a href="https://tensorflow.rstudio.com/reference/cloudml/" class="btn btn-dark">Más información,clic aquí</a>
<center><a href="https://tensorflow.rstudio.com/reference/cloudml/" class="btn btn-dark">Más información,clic aquí</a></center>
</div>
</div>
```
:::

::: {.g-col-12 .g-col-md-4 .col-lg-4}
::: {.g-col-12 .g-col-md-6 .col-lg-4}
```{=html}
<div class="card">
<div class="card-body">
<h5 class="card-title">{rgee}</h5>
<div align='center'><img src='https://user-images.githubusercontent.com/16768318/118376965-5f7dca80-b5cb-11eb-9a82-47876680a3e6.png' width='100px'align='center'></div>
<p class="card-text">Paquete que integrar Google Earth Engine con R.</p>
<a href="https://r-spatial.github.io/rgee/" class="btn btn-dark">Más información,clic aquí</a>
</div>
</div>
```
:::
::: {.g-col-12 .g-col-md-4 .col-lg-4}
```{=html}
<div class="card">
<div class="card-body">
<h5 class="card-title">{tmap}</h5>
<div align='center'><img src='https://user-images.githubusercontent.com/3457131/78889077-49661800-7a63-11ea-95b6-31db1ce6815c.png' width='100px'align='center'></div>
<p class="card-text">Paquete para generar mapas temáticos.</p>
<a href="#" class="btn btn-dark">Más información,clic aquí</a>
</div>
</div>
```
:::

::: {.g-col-12 .g-col-md-4 .col-lg-4}
```{=html}
<div class="card">
<div class="card-body">
<h5 class="card-title">{gifski}</h5>
<div align='center'><img src='https://user-images.githubusercontent.com/23284899/258276611-89116f95-dd02-45c4-9ee5-c6df413f1484.png' width='100px'align='center'></div>
<p class="card-text">Paquete que te permite realizar gif de forma sencilla.</p>
<a href="#" class="btn btn-dark">Más información,clic aquí</a>
<center><a href="https://r-spatial.github.io/rgee/" class="btn btn-dark">Más información,clic aquí</a></center>
</div>
</div>
```
Expand All @@ -144,7 +120,7 @@ Este proceso solo se realizar una única vez, cuando ya tienes instalado y confi
```{r}
#| eval: false
# Lista de paquetes a instalar
pkgs <- c("tidyverse", "tidyterra","remotes" ,"tmap", "gifski", "cloudml", "sf")
pkgs <- c("tidyverse", "tidyterra","remotes","cloudml", "sf", "cptcity")
# install.packages(pkgs = pkgs, dependencies = TRUE)
# Se recomienda instalar la versión de GitHub de rgee
Expand All @@ -167,10 +143,9 @@ for (pkg in pkgs) {
El paquete tidyverse está instalado y cargado correctamente.
El paquete tidyterra está instalado y cargado correctamente.
El paquete remotes está instalado y cargado correctamente.
El paquete tmap está instalado y cargado correctamente.
El paquete gifski está instalado y cargado correctamente.
El paquete cloudml está instalado y cargado correctamente.
El paquete sf está instalado y cargado correctamente
El paquete sf está instalado y cargado correctamente.
El paquete cptcity está instalado y cargado correctamente.
```
El paquete de `rgee` actualmente presenta algunos incovenientes con la versión de CRAN, especialmente para los sistemas operativos de **Windows**, se recomienda instalar la versión de desarrollo la cual está alojada en GitHub.
Para su correcta instalación se recomienda seguir cualquiera de las siguientes alternativas mostradas 👇
Expand Down Expand Up @@ -201,4 +176,4 @@ remotes::install_github('r-spatial/rgee')
```{r}
#| eval: true
remotes::install_github("r-earthengine/rgeeExtra")
```
```
2 changes: 1 addition & 1 deletion 02_rgee-setup.qmd
View file
Original file line number Diff line number Diff line change
Expand Up @@ -93,4 +93,4 @@ ee_Initialize(user = "[email protected]", drive = TRUE)

```{r}
ee$String('Hola mundo espacial🌎🚀')$getInfo()
```
```
63 changes: 32 additions & 31 deletions 03_methodology.qmd
View file
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
## ¿Qué es RUSLE?

Metodología desarrollada por Renard et al (1991) que permite estimar la perdida media anual de suelo en función a un modelo matemático.
Metodología desarrollada por **Renard et al (1991)** que permite estimar la perdida media anual de suelo en función a un modelo matemático.

\begin{equation}
A = R \cdot K \cdot LS \cdot C \cdot P
Expand All @@ -13,7 +13,7 @@ Donde los cinco parámetros de entrada están relacionados con la precipitación
### Factor R

Es el factor de erosividad de escorrentía de lluvia (MJ·mm·ha−1·h−1·Año−1), índice numérico que expresa la capacidad de la lluvia para erosionar el suelo.
Para su cálculo existen diferentes modelos; sin embargo para este manual se consideró usar la formula de Wischmeier y Smith (1978) presentada el paper de [Zubairul Isla]() la cual la base de referencia.
Para su cálculo existen diferentes modelos; sin embargo para este manual se consideró usar la formula de **Wischmeier y Smith (1978)**.

\begin{equation}
R = 1.73 \times 10^{(1.5\times\log(Pm^2/Pa)-0.08188)}
Expand All @@ -28,27 +28,45 @@ Donde:
### Factor K
Es el factor de erodibilidad del suelo $(Mg·h·MJ^{−1}·mm^{−1})$, una descripción numérica de la susceptibilidad de las partículas del suelo a la erosión hídrica. Estos valores van de 0 a 1, donde 0 es menos suceptible y 1 es altamente susceptible a la erosión hídrica.

Para su cálculo se tomo como referencia la formula de Sharpley and Williams (1990).
Para su cálculo se tomo como referencia la formula de Sharpley and **Williams (1983)**.

\begin{equation}
K = [0.2 + 0.3 \times exp(-0.0256 \times SAN \times (1 - \frac{SIL}{100}))]\times[1-\frac{0.25\times CLA}{CLA + exp(3.72 - 2.95\times CLA)}]
K = f_{Csand} \cdot f_{Cl-syo} \cdot f_{org} \cdot f_{hyosunnd}
\end{equation}

Donde:

- SAN: Porcentaje de arena

- SIL: Porcentaje de limo

- CLA: Porcentaje de arcilla
- $f_{Csand}$ : Factor que reduce el indicador K en suelos con una alta proporción de contenido de arena gruesa y mayor para suelos con poca arena.

- SN: 1 - SAN/100
$$
f_{Csand} = \left(0.2 + 0.3 \cdot e^{-0.256 \cdot m_s \cdot (1 + m_silt/100)}\right)
$$


- $f_{Cl-syo}$: Factores de erodibilidad bajos del suelo para suelos con una alta relación arcilla / limo.

$$
f_{Cl-syo} = (m_{siltmc} + m_{silt})^{0.3}
$$


- $f_{org}$: Factor que reduce los valores de K en suelos con un alto contenido de carbono orgánico.


$$
f_{orgC} = \left(1.0 + 0.256 \cdot \frac{{orgC}}{{orgC + e^{3.72 - 2.95 \cdot orgC}}}\right)
$$

- $f_{hyosand}$: Factor que reduce el valor K de las clases de suelo con alto contenido de arena.

$$
f_{hyosunnd} = \left(1.0 + 0.7 \cdot (1 - \frac{m_s}{100}) \cdot (1 - \frac{m_s}{100}) + e^{5.51 + 22.9 \cdot (1 - \frac{m_s}{100})}\right)
$$

### Factor LS

Es el factor de longitud de pendiente (L) y el factor de inclinación (S), ambos variables combinadas expresan el efecto de la topografía local sobre la tasa dde erosión del suelo.
Para su cálculo se tomo en cuenta la formula establecida por Moore (1985).
Para su cálculo se tomo en cuenta la formula establecida por **Moore (1985)**.

\begin{equation}
LS = (0.4 + 1) \times (Flowacc\times CellSize /22.13)^{0.4} \times (\sin(\theta)/0.0896)^{1.3}
Expand All @@ -68,7 +86,7 @@ Donde:
Determina la eficacia relativa de los sistemas de manejo del suelo y de los cultivos en terminos de prevencion o reduccion de la perdida de suelo.
Los valores oscila entre 0, para una superficie no erosible, y 1, parcela desnuda (sin vegetación). Por temas práticos muchos autores adoptan enfoques simplificados: por ejemplo, utilizar el mapas de cobertura del suelo y asignando un factor C a cada clase, o por ultima emplear los valores de NDVI y las condiciones climáticas.

Para su cálculo se tomo como referencia la formula de Almagro et al (2019).
Para su cálculo se tomo como referencia la formula de **Almagro et al (2019)**.

\begin{equation}
C = 0.1 \times(\frac{-NDVI + 1}{2})
Expand All @@ -85,22 +103,5 @@ Donde:

### Factor P

Recoge la influencia que tienen las prácticas de conservación de suelos sobre las tasas de erosión, en otras palabras el factor P tiene como objetivo reducir la escorrentía del agua y, en consecuencia, la pérdida de suelo.

Para su cálculo se tomo en consideración la tabla de valores propuestos por , donde se establece lo siguienente:


| Clasificación de Usos de Suelo | P |
|--------------------------------|---|
| Bosque | 0.8|
| Tierras de cultivo | 0.5 |
| Construcción | 1.0|
| Vegetación esparcida | 1.0|
| Cuerpos de agua | 1.0|
| Matorral | 1.0 |
| Humedales | 1.0




https://www.frontiersin.org/articles/10.3389/fenvs.2023.1136243/full
Recoge la influencia que tienen las prácticas de conservación de suelos sobre las tasas de erosión, en otras palabras el factor P tiene como objetivo reducir la escorrentía del agua y, en consecuencia, la pérdida de suelo. Existen diferentes clasificaciones de pesos según el tipo de cobertura presente en el ámbito de estudio, como se observa en los trabajos de **Mekonnen, E. et al. (2023)** y **Mashes, C. S. et al. (2023)**
Sin embargo; la ecuación RUSLE ejecutó un factor P igual a 1 para reflejar la erosión potencial bajo las condiciones actuales de ninguna práctica estructural de conservación de suelos. Por este mismo sustento el presente manual toma el mismo criterio.
Loading

0 comments on commit e906ae8

Please sign in to comment.