Zapisywanie ocen

Część sekcji Logika i przepływ sterowania ścieżki R w Coddy. Lekcja 23 z 64.

Wyzwanie

Łatwy

Dodaj polecenie GRADE do funkcji gradebook(). Wszystkie polecenia z poprzednich kroków mają nadal działać dokładnie tak jak wcześniej.

GRADE <name> <score>: jeśli uczeń nie jest zapisany, zwróć no student <name>. W przeciwnym razie dopisz wynik do ocen ucznia i zwróć recorded <score> for <name>.

Wyniki to liczby, takie jak 90 lub 87.5; zapisz je w odpowiedzi tak, jak R wyświetla tę liczbę.

Udostępniony kod przekazuje każdy wiersz wejścia do gradebook() jako jedno polecenie i wyświetla każdą zwróconą odpowiedź w osobnym wierszu. Imię to jedno słowo zapisane małymi literami, a wejście zawiera tylko opisane dotąd polecenia.

Spróbuj swoich sił

gradebook <- function(commands) {
  grades <- list()
  replies <- c()
  for (cmd in commands) {
    parts <- strsplit(cmd, " ")[[1]]
    name <- parts[2]
    if (parts[1] == "ADD") {
      if (name %in% names(grades)) {
        replies <- c(replies, paste(name, "already exists"))
      } else {
        grades[[name]] <- numeric(0)
        replies <- c(replies, paste("added", name))
      }
    }
  }
  replies
}

# Dostarczony kod wejścia/wyjścia: pozostaw go bez zmian
input <- suppressWarnings(readLines(file("stdin")))
cat(gradebook(input), sep = "\n")