성적 기록

Coddy R 여정의 논리와 흐름 섹션에 포함된 레슨. 64개 중 23번째.

챌린지

쉬움

GRADE 명령을 gradebook()에 추가하세요. 이전 단계의 모든 명령이 이전과 정확히 동일하게 작동하도록 유지하세요.

GRADE <name> <score>: 학생이 저장되어 있지 않으면 no student <name>이라고 응답합니다. 그렇지 않으면 점수를 학생의 성적에 추가하고 recorded <score> for <name>이라고 응답합니다.

점수는 90 또는 87.5와 같은 숫자입니다. 응답에는 R이 숫자를 출력하는 방식 그대로 작성하세요.

제공된 코드는 각 입력 줄을 하나의 명령으로 gradebook()에 전달하고, 반환된 각 응답을 한 줄에 하나씩 출력합니다. 이름은 소문자 한 단어이며, 입력에는 지금까지 설명한 명령만 포함됩니다.

직접 해보기

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
}

# 제공된 입력/출력 코드: 그대로 유지하세요
input <- suppressWarnings(readLines(file("stdin")))
cat(gradebook(input), sep = "\n")