R/functions.R

In jplassais/MNP: Mon super nouveau package

#' Fonction rnorm100
#'
#' This function generates a normal distribution with a mean of 100
#'
#' @param n integer. number of values
#' @importFrom stats rnorm
#' @example
#' x <- rnorm100(100)
#' @export
rnorm100 <- function(n){
  rnorm(n,100,1)
}

#' Fonction rnorm10
#'
#' This function generates a normal distribution with a mean of 10
#'
#' @param n integer. number of values
#' @importFrom stats rnorm
#' @example
#' x <- rnorm10(100)
#' @export
rnorm10 <- function(n){
  rnorm(n,10,1)
}