Menu
Coddy logo textTech

Повторение — Обратный вектор

Часть раздела Основы путешествия по R на Coddy — урок 61 из 78.

challenge icon

Задание

Легко

Вы получите одну строку входных данных, содержащую числа, разделенные запятыми (например, 10,20,30,40,50).

Выполните следующие операции:

  1. Создайте вектор из входных данных, разделенных запятыми
  2. Разверните вектор так, чтобы последний элемент стал первым
  3. Выведите развернутый вектор
  4. Выведите сумму первого и последнего элементов развернутого вектора

Например, если входные данные:

5,15,25,35,45

Выходные данные должны быть:

[1] 45 35 25 15  5
[1] 50

Объяснение: Исходный вектор c(5, 15, 25, 35, 45) разворачивается в c(45, 35, 25, 15, 5). Сумма первого элемента (45) и последнего элемента (5) развернутого вектора равна 50.

Попробуйте сами

# Чтение входных данных
con <- file("stdin", "r")
input <- suppressWarnings(readLines(con, n = 1))

# Разбор чисел, разделенных запятыми, в вектор
numbers <- as.numeric(strsplit(input, ",")[[1]])

# TODO: Напишите свой код ниже
# 1. Инвертируйте вектор
# 2. Выведите инвертированный вектор
# 3. Вычислите и выведите сумму первого и последнего элементов инвертированного вектора

Все уроки раздела Основы