R/testtwo.R

In megregg/TestPackage2:

#' Test Function 2
#' 
#' This test function \emph{does} have a space after "document"
#' 
#' @param y a number or vector
#' @return a returns a number or vector
#' @details the function returns twice the input 
#' 
#' @examples
#' b <- 10
#' testtwo(b)
#' 
#' @export 

testtwo <- function(y) {
  a <- 2*y
  return(a)
}