Récapitulatif - Classement

Fait partie de la section Logique et flux d’exécution du Journey R de Coddy. Leçon 41 sur 64.

Défi

Moyen

Complétez leaderboard(names, points). Chaque entrée enregistre les points marqués par un joueur lors d’un tour, et un joueur peut apparaître plusieurs fois. Retournez une ligne par joueur, 1. ana 15 (2 rounds), classées selon le total de points, du plus élevé au plus faible. Les joueurs ayant le même total sont classés par ordre alphabétique.

Ajoutez ensuite Best round: suivi du joueur et des points de l’entrée unique la plus élevée, comme cy 12. Lorsque plusieurs entrées ont les mêmes points les plus élevés, utilisez la première d’entre elles.

Le code fourni lit les tours sous forme de paires name:points séparées par des virgules et affiche chaque ligne retournée.

Essayez vous-même

leaderboard <- function(names, points) {
  # Écrivez votre code ici
  character(0)
}

# Code d'entrée/sortie fourni : gardez-le tel quel
input <- suppressWarnings(readLines(file("stdin")))
pairs <- strsplit(strsplit(input[1], ",")[[1]], ":")
names <- sapply(pairs, function(p) p[1])
values <- as.numeric(sapply(pairs, function(p) p[2]))
cat(leaderboard(names, values), sep = "\n")