R/atmospheric_parameters.R

In BrazilMet: Download and Processing of Automatic Weather Stations (AWS) Data of INMET-Brazil

#' Atmospheric pressure (Patm)
#'
#' @param z Elevation above sea level (m)
#' @examples
#' \dontrun{
#' Patm <- Patm(z)
#' }
#' @export
#' @return Returns a data.frame object with the atmospheric pressure calculated.
#' @author Roberto Filgueiras, Luan P. Venancio, Catariny C. Aleman and Fernando F. da Cunha

Patm <- function(z) {
  P <- 101.3 * ((293 - 0.0065 * z) / 293)^5.26
  P <- as.data.frame(P)
  colnames(P) <- "Patm (kPa)"
  return(P)
}


#' Psychrometric constant
#' @description Psychrometric constant (kPa/°C) is calculated in this function.
#' @param Patm Atmospheric pressure (kPa)
#' @examples
#' \dontrun{
#' psy_df <- psy_const(Patm)
#' }
#' @export
#' @return A data.frame object with the psychrometric constant calculated.
#' @author Roberto Filgueiras, Luan P. Venancio, Catariny C. Aleman and Fernando F. da Cunha


psy_const <- function(Patm) {
  psy_const <- 0.000665 * Patm
  psy_const <- as.data.frame(psy_const)
  colnames(psy_const) <- "psy_const"
  return(psy_const)
}