R/cul.R

In 17ue052/virtual:

#'Calculate (x+5)(y+10)
#'
#'@param x some kind of numbers
#'@param y some kind of numbers
#'
#'@return =(x+5)(y+10)
#'@description calculate
#'
#'@export
fun1 <- function(x,y)
{
  a <- x + 5
  b <- y + 10
  z <- a * b

  return(z)
}