R/pipe_fn.R

In aammd/netwerk: Werks with Networks

Defines functions lognormal_median

Documented in lognormal_median

#' calculate a lognormal median
#'
#' @param n number of samples
#'
#' @return
#' @export
#'
#' @importFrom magrittr %>%
lognormal_median <- function(n) {
  rnorm(n) %>%
    exp %>%
    median
}