AquaBEHER

Estimation and Prediction of Wet Season Calendar and Soil Water Balance for Agriculture

https://github.com/RobelTakele/AquaBEHER

Keywords

Repository

Estimation and Prediction of Wet Season Calendar and Soil Water Balance for Agriculture

README.Rmd

---
output: github_document
---



```{r, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%",
  echo = TRUE,
  warning = FALSE,
  message = FALSE
)
```








Report a Bug    |   
Request a Feature    |   
Ask a Question





  


  


  


  









**Estimates** and **predicts** the wet season calendar (WSC) and soil water balance for agricultural applications. It integrates daily potential evapotranspiration (PET) and soil water balance parameters to compute the WSC for crop and soil water management. Using these parameters, `AquaBEHER` can estimate and predict the onset, cessation, and duration of the wet season based on an agroclimatic approach.

### ⛓ Key Features
- **Daily potential evapotranspiration (PET)** estimation using various methods.
- **Daily soil water balance** estimation based on adjustable soil water holding capacity (soilWHC).
- **Wet season calendar** estimation and seasonal prediction including:
    - Onset of the wet season
    - Cessation of the wet season
    - Duration of the wet season

`AquaBEHER` is designed to facilitate water-efficient agricultural practices in response to climate variability and change.

---

## :arrow_down: Installation

### Install from CRAN:
```r
install.packages("AquaBEHER")
```

### Install the development version from GitHub:
```r
# install.packages("devtools")
devtools::install_github("RobelTakele/AquaBEHER")
```
To view the vignettes in RStudio, run:
```r
vignette("AquaBEHER", "AquaBEHER")
```
Further details regarding `AquaBEHER` are available on the package website, visit [here](https://robeltakele.github.io/AquaBEHER/).

---

## :fast_forward: Quick Example

Here's a quick example to estimate daily soil water balance:

```{r example, message=FALSE}
library(AquaBEHER)
data(AgroClimateData)

# Estimate PET using Penman-Monteith method
PET <- calcEto(AgroClimateData, method = "PM", Zh = 10)

# Add PET to the dataset
AgroClimateData$Eto <- PET$ET.Daily

# Estimate daily soil water balance for a soil with 100mm water holding capacity
watBal.list <- calcWatBal(data = AgroClimateData, soilWHC = 100)
watBal <- watBal.list$data
head(watBal)
```

---

## :bar_chart: Visualization

Visualize the daily soil water balance, rainfall, and potential evapotranspiration (Eto) for the climatological year 2019–2020:

```{r watBalPlot, fig.height=6, fig.width=8, fig.dpi=400}
library(ggplot2)

# Filter the data for 2019 and 2020
watBal.19T20 <- watBal[watBal$Year %in% c(2019, 2020), ]
date.vec <- as.Date(paste(watBal.19T20$Year, watBal.19T20$Month, watBal.19T20$Day, sep = "-"), format = "%Y-%m-%d")
watBal.19T20$date <- date.vec

# Plot water balance with ggplot2
ggplot(watBal.19T20, aes(x = date)) +
  geom_bar(aes(y = Rain), stat = "identity", fill = "#1f78b4", alpha = 0.6, width = 0.8) +
  geom_line(aes(y = AVAIL), color = "#33a02c", size = 1.5) +
  geom_line(aes(y = Eto), color = "#ff7f00", size = 1.2, linetype = "dashed") +
  scale_x_date(date_labels = "%b %Y", date_breaks = "1 month", expand = c(0.01, 0)) +
  scale_y_continuous(
    name = "Available Soil Water (mm)",
    sec.axis = sec_axis(~., name = "Rainfall (mm)")
  ) +
  labs(
    title = "Rainfall, Available Soil Water, and Potential Evapotranspiration",
    subtitle = "2019-2020 Data",
    x = NULL, y = NULL
  ) +
  theme_minimal(base_size = 15) +
  theme(
    plot.title = element_text(face = "bold", size = 18, hjust = 0.5),
    plot.subtitle = element_text(size = 14, hjust = 0.5, color = "grey40"),
    axis.text.x = element_text(angle = 45, hjust = 1),
    panel.grid.minor = element_blank(),
    panel.grid.major = element_line(linetype = "dotted", color = "grey80")
  )
```

## :memo: Citation

If you used `AquaBEHER` in your work, please cite it. You can view the most recent citation by running:
```r
citation(package = "AquaBEHER")
```

```
To cite `AquaBEHER` in publications, please use:

  Robel Takele, Matteo Dell'Acqua (2023). `AquaBEHER`: Estimation and Prediction of Wet Season Calendar and Soil
  Water Balance for Agriculture. R package version 1.0.0. Available at
  https://cran.r-project.org/web/packages/AquaBEHER

A BibTeX entry for LaTeX users is:

  @Manual{,
    title = {`AquaBEHER`: Estimation and Prediction of Wet Season Calendar and Soil Water Balance for Agriculture},
    author = {Robel Takele and Matteo Dell'Acqua},
    year = {2023},
    note = {R package version 1.0.0},
    url = {https://robeltakele.github.io/AquaBEHER/},
  }
```
## :earth_africa: Feedback and Contributions 🤝 

We appreciate feedback and contributions to improve `AquaBEHER`. Feel free to report bugs, suggest features, or join discussions.

Your contributions make a difference!

> [!IMPORTANT]
> Submit issues [here](https://github.com/RobelTakele/AquaBEHER/issues/) or join discussions [here](https://github.com/RobelTakele/AquaBEHER/discussions).

 ✤ We appreciate your support and look forward to making our package even better with your help!

---

## :mailbox_with_mail: Contact Us



The **Genetics Group** at the *Institute of Plant Sciences* is a culturally diverse, research-driven team focused on advancing agricultural innovation. We combine crop genetics, climate science, and participatory strategies to develop sustainable farming solutions.

We are based at **Scuola Superiore Sant'Anna**, Pisa, Italy.

For inquiries, please reach out to:
- [Matteo Dell'Acqua](mailto:m.dellacqua@santannapisa.it)
- [Mario Enrico Pè](mailto:m.pe@santannapisa.it)

Learn more about our work on the [institute web page](https://www.santannapisa.it/en/institute/plant-sciences).


  
    
  
  
    
  
  
    
  
  
    
  




## :link: Resources

- [`AquaBEHER` Documentation](https://CRAN.R-project.org/package=AquaBEHER)
- [`AquaBEHER` GitHub Repository](https://github.com/RobelTakele/AquaBEHER)
- [Scuola Superiore Sant'Anna](https://www.santannapisa.it/en/institute/plant-sciences)

---

## 🌟 Show Your Support

If you find **`AquaBEHER`** helpful or interesting, please consider giving us a star on GitHub. Your support helps promote the project and lets others know it's worth checking out.

🙏 Thank you for your support! 👍

[![Star this project](https://img.shields.io/github/stars/RobelTakele/AquaBEHER?style=social)](https://github.com/RobelTakele/AquaBEHER/stargazers)

---

## 👥 Contributors


  

    👨‍💻 Robel Takele

          Email: takelerobel@gmail.com

          GitHub: @RobelTakele
  

  

    👨‍💻 Matteo Dell'Acqua

          Email: m.dellacqua@santannapisa.it

          GitHub: @MatteoDellAcqua
  



### 🄯 License

This project is licensed under the GNU General Public License, [GPL-3](https://cran.r-project.org/web/licenses/GPL-3).

 Back to Top 

Owner

GitHub Events

Committers

Last synced: 11 months ago

Issues and Pull Requests

Last synced: 11 months ago

Packages