Překonej Gausse pomocí R

Existuje slavná historka o mladém Gaussovi. Jako žák měl líného učitele, který chtěl zaměstnat celou třídu – zadal jim, aby sečetli čísla od 1 do 100. Gauss přišel s odpovědí téměř okamžitě: 5050. Na místě sám odvodil vzorec pro výpočet součtu aritmetické řady. Pro řady s různými počátečními hodnotami a kroky existují obecnější vzorce, ale proč je odvozovat, když to za nás může udělat R?

Toto cvičení je součástí kurzu

Intermediate R

Zobrazit kurz

Pokyny k cvičení

Pomocí funkce seq() vytvoř posloupnost od 1 do 500 s krokem 3. Výsledný vektor ulož do proměnné seq1.
Opět pomocí funkce seq() vytvoř posloupnost od 1200 do 900 s krokem -7. Ulož ji do proměnné seq2.
Spočítej celkový součet obou posloupností – buď zavoláš funkci sum() dvakrát a výsledky sečteš, nebo posloupnosti nejdřív spojíš a pak použiješ sum() jednou. Výsledek vypiš do konzole.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# Create first sequence: seq1


# Create second sequence: seq2


# Calculate total sum of the sequences

Upravit a spustit kód