# Definción de una función simple
miPrimeraFuncion <- function(n) {
n*n # Halle el cuadrado de un número.
}
# Uso de la función.
# Definir un valor:
k <- 10
# Llamado a la función
# Tres forma de llamar a una función
miPrimeraFuncion(k)
## [1] 100
m <- miPrimeraFuncion(k)
m
## [1] 100
(m <- miPrimeraFuncion(k))
## [1] 100
body(miPrimeraFuncion)
## {
## n * n
## }
formals(miPrimeraFuncion)
## $n
environment(miPrimeraFuncion)
## <environment: R_GlobalEnv>