Переможіть Гауса за допомогою R

Існує відома історія про юного Гауса. У школі в нього був ледачий учитель, який хотів зайняти клас, доручивши додати числа від 1 до 100. Гаус майже миттєво отримав відповідь — 5050. Просто на місці він вивів формулу для обчислення суми арифметичної прогресії. Існують загальніші формули для обчислення суми арифметичної прогресії з різними початковими значеннями та кроками. Замість того щоб виводити таку формулу, чому б не скористатися R, щоб обчислити суму послідовності?

Ця вправа є частиною курсу

Середній рівень R

Переглянути курс

Інструкції до вправи

Використовуючи функцію seq(), створіть послідовність від 1 до 500 з кроком 3. Присвойте отриманий вектор змінній seq1.
Знову за допомогою функції seq() створіть послідовність від 1200 до 900 з кроком -7. Присвойте її змінній seq2.
Обчисліть загальну суму елементів двох послідовностей: або двічі застосуйте функцію sum() і складіть результати, або спочатку об'єднайте послідовності, а потім один раз застосуйте функцію sum(). Виведіть результат у консоль.

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

# Create first sequence: seq1


# Create second sequence: seq2


# Calculate total sum of the sequences

Редагувати та запускати код