Menu
CoddyTech

Добавление и удаление ключей

Часть раздела Логика и потоки выполнения путешествия по R на Coddy. Урок 9 из 64.

Присваивание имени обновляет его значение, если ключ существует, и добавляет новую запись, если его нет:

stock <- c(apples = 12, pears = 3)
stock["pears"] <- 5
stock["plums"] <- 8
print(stock)

Вывод:

apples  pears  plums 
    12      5      8 

Чтобы изменить значение на основе его текущего значения, прочитайте и запишите значение по тому же ключу:

stock <- c(apples = 12, pears = 3)
stock["apples"] <- stock["apples"] - 2
print(stock[["apples"]])

Вывод:

[1] 10

Таблица поиска может быть пустой в начале и создаваться по одному ключу за раз с помощью c():

ages <- c()
ages["Ada"] <- 36
ages["Linus"] <- 21
print(names(ages))

Вывод:

[1] "Ada"   "Linus"

Удалите элемент из именованного вектора, сохранив все остальные имена:

stock <- c(apples = 12, pears = 3, plums = 8)
stock <- stock[names(stock) != "pears"]
print(names(stock))

Вывод:

[1] "apples" "plums" 

Для списка присваивание NULL удаляет элемент:

user <- list(name = "Ada", temp = TRUE)
user[["temp"]] <- NULL
print(names(user))

Вывод:

[1] "name"
challenge icon

Задание

Легко

Заверши apply_delivery(stock, item, qty). Добавь qty к запасу item или добавь item с количеством qty, если его ещё нет в запасах. Верни обновлённые запасы.

Предоставленный код считывает запасы в виде пар name=quantity, затем товар и количество. Он выводит каждую запись возвращённых запасов в формате name: quantity, в порядке следования в запасах.

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

apply_delivery <- function(stock, item, qty) {
  # Напишите здесь свой код
  stock
}

# Готовый код ввода-вывода: оставьте его без изменений
input <- suppressWarnings(readLines(file("stdin")))
stock <- c()
for (pair in strsplit(input[1], ",")[[1]]) {
  kv <- strsplit(pair, "=")[[1]]
  stock[kv[1]] <- as.numeric(kv[2])
}
stock <- apply_delivery(stock, input[2], as.numeric(input[3]))
for (name in names(stock)) {
  cat(name, ": ", stock[[name]], "\n", sep = "")
}
quiz iconПроверьте себя

В этом уроке есть небольшой тест. Начните урок, чтобы ответить на вопросы и сохранить прогресс.

Все уроки раздела Логика и потоки выполнения

Потренируйтесь самостоятельно: Онлайн-компилятор R