Ejemplo de función de saludo
saludo <- function(){
print("Bienvenido al curso de R")
}
saludo()
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 devuelve el valor de x.
}
0 comentarios