R/calc_bmi.R

In ronkeizer/clinPK: Clinical Pharmacokinetics Toolkit

#' Calculate BMI
#'
#' @param weight weight in kg
#' @param height height in cm
#' @examples
#' calc_bmi(weight = 70, height = 160)
#' @export
calc_bmi <- function(weight, height) {
  return(weight / (height/100)^2)
}