Recapitulação - Função Sigma

Parte da seção Fundamentos do Journey de R da Coddy. Lição 49 de 78.

Desafio

Fácil

Crie uma função chamada sigma que receba um argumento n e retorne a soma de todos os números inteiros de 1 até n.

Leia um número da entrada, converta-o para um valor numérico e chame sua função sigma com este valor. Imprima o resultado retornado.

Por exemplo, se a entrada for 5, sua função deve calcular 1 + 2 + 3 + 4 + 5 = 15, e a saída deve ser:

[1] 15

Se a entrada for 10, sua função deve calcular a soma de 1 a 10, e a saída deve ser:

[1] 55

Se a entrada for 1, a saída deve ser:

[1] 1

Experimente você mesmo

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

# TODO: Criar uma função chamada 'sigma' que recebe um argumento 'n'
# e retorna a soma de todos os números inteiros de 1 a n


# Chamar a função e imprimir o resultado
print(sigma(n))