#' Basic arithmetic
#'
#' @param x,y numeric vectors.
#' @examples
#' suma1(5)
#' multi1(8)
#' @name aritmetica
NULL
#' @rdname aritmetica
#' @export
suma1 <- function(x) x + 10
#' @rdname aritmetica
#' @export
multi1 <- function(y) y * 10
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.