Обгоните Гаусса с помощью R

Существует известная история о юном Гауссе. Однажды его учитель, желая занять класс, попросил учеников сложить все числа от 1 до 100. Гаусс нашёл ответ почти мгновенно — 5050. Он на ходу вывел формулу для суммы арифметической прогрессии. Существуют и более общие формулы — для последовательностей с произвольным начальным значением и шагом. Но зачем выводить формулу вручную, если можно воспользоваться R для вычисления суммы?

Это упражнение является частью курса

Intermediate 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

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