Repaso - Función Sigma

Parte de la sección Fundamentos del Journey de R de Coddy — lección 49 de 78.

Desafío

Fácil

Crea una función llamada sigma que tome un argumento n y devuelva la suma de todos los números enteros desde 1 hasta n.

Lee un número de la entrada, conviértelo a un valor numérico y llama a tu función sigma con este valor. Imprime el resultado devuelto.

Por ejemplo, si la entrada es 5, tu función debería calcular 1 + 2 + 3 + 4 + 5 = 15, y la salida debería ser:

[1] 15

Si la entrada es 10, tu función debería calcular la suma del 1 al 10, y la salida debería ser:

[1] 55

Si la entrada es 1, la salida debería ser:

[1] 1

Pruébalo tú mismo

# Leer la entrada
con <- file("stdin", "r")
n <- suppressWarnings(readLines(con, n = 1))
n <- as.numeric(n)

# TODO: Crear una función llamada 'sigma' que reciba un argumento 'n'
# y devuelva la suma de todos los enteros desde 1 hasta n


# Llamar a la función e imprimir el resultado
print(sigma(n))