Funciones en R

Ejemplo básico, función que nos da el sucesor del número introducido por parámetro.

sucesor <- function(x) {
x + 1
}

Ejemplo con función con argumento por defecto.

diferencia_cuadrada <- function(x, y=2) {
x^2 – y^2
}

Ejemplo de sustitución de vocales «aeiou» por «12345» de una cadena dada.

numeros_por_vocales <- function(…){
x <- paste(…)
x <- tolower(x) # pasa los valores a minusculas
x <- chartr(«a», «1», x) # Sustituye a por el 1
x <- chartr(«e», «2», x)
x <- chartr(«i», «3», x)
x <- chartr(«o», «4», x)
x <- chartr(«u», «5», x) # la función devulve el valor de x.
}