R/suma_cuadrados.R

In mescolano/test:

#' Add the squares of two numbers
#'
#' @param x a number
#' @param y a number
#' @return \code{x}^2 \code{y}^2
#' @examples
#' suma.cuadrados(3,6)
suma.cuadrados <- function(x,y){x^2+y^2}