R/addsub.R

In longchampm/tester:

#' my functions
#'
#' simple functions
#' @name myfunctions

NULL


#' Add two numbers
#'
#' Add \code{x} and \code{y}
#' @return \code{x + y}
#' @examples jadd(1,2)
#' @rdname myfunctions

jadd <- function( x, y ) {
  return( x + y )
}

#' Subtract two numbers
#'
#' Subtract \code{y} from \code{x}
#' @return \code{x - y}
#' @examples jsub(1, 2)
#' @rdname myfunctions

jsub <- function(x, y){
  return( x - y )
}