Podsumowanie — klasyfikator ocen

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

Wyzwanie

Średni

Uzupełnij grade_report(names, scores). Przydziel każdemu uczniowi ocenę za pomocą ifelse(): A od 90, B od 75, C od 50, a F poniżej 50. Zwróć jeden wiersz na ucznia, ada: 93 (A) Excellent, gdzie komentarz pochodzi z switch() dla danej oceny: Excellent dla A, Good dla B, Pass dla C i Retake dla F.

Następnie dodaj Top: , po którym podaj uczniów z najwyższym wynikiem, w kolejności podanej na wejściu i połączonych za pomocą , .

Dostarczony kod odczytuje imiona i wyniki jako dwa wiersze z wartościami oddzielonymi przecinkami i wypisuje każdy zwrócony wiersz.

Spróbuj swoich sił

grade_report <- function(names, scores) {
  # Wpisz tutaj swój kod
  character(0)
}

# Dostarczony kod wejścia/wyjścia: pozostaw go bez zmian
input <- suppressWarnings(readLines(file("stdin")))
cat(grade_report(strsplit(input[1], ",")[[1]], as.numeric(strsplit(input[2], ",")[[1]])), sep = "\n")