R/tcplHillVal.R

In tcpl: ToxCast Data Analysis Pipeline

#-------------------------------------------------------------------------------
# tcplHillVal: Calculate the value for a given concentration
#-------------------------------------------------------------------------------

#' @rdname hill_utils
#' @export

tcplHillVal <- function(logc, tp, ga, gw, bt = 0) {
  
  bt + (tp - bt)/(1 + 10^((ga - logc)*gw))

}

#-------------------------------------------------------------------------------