#' @title Calculate water intake
#'
#' @details
#' \lifecycle{experimental}
#'
#' Remember that you may need to drink more water if you’re physically
#' active (that is why TDEE is used). Living in a hot climate will also affect
#' your water intake. Keep in mind that this is an estimate.
#'
#' @param tdee Total daily energy expenditure
#'
#' @return Water intake (mL)
#'
#' @details 20% of you total daily water intake enters the body through food.
#' We assume that 1 kcal equals1 mL here.
#'
#' For more information go to:
#' https://www.gigacalculator.com/calculators/water-intake-calculator.php
#'
#' Water intake is calculated as follows:
#' \deqn{intake = tdee \times 0.8}
#'
#' @examples
#' calculate_water_intake(2700)
#' @rdname calculate_water_intake
#' @export
calculate_water_intake <- function(tdee) {
checkmate::assert_number(tdee, lower = 0)
intake <- tdee * 0.8
return(intake)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.