R/TA.R

In AquaAnalytix: Water Quality Analysis

Defines functions TA

Documented in TA

#' @export
TA <- function(P, M, N, Vol){
  TA = ((P+M)*N*50*1000)/Vol
  return(TA)
}

Try the AquaAnalytix package in your browser