Repaso: invitados al evento

Parte de la sección Lógica y flujo del Journey de R de Coddy. Lección 16 de 64.

Desafío

Intermedio

Completa guest_report(invited, arrivals). arrivals enumera cada registro de entrada, y un invitado puede registrarse más de una vez. Devuelve cuatro líneas:

Arrived: seguido del número de invitados distintos que se registraron
No-shows: seguido de los invitados que fueron invitados pero nunca se registraron
Uninvited: seguido de los invitados que se registraron sin invitación
Repeat check-ins: seguido de los invitados que se registraron más de una vez

Ordena cada lista de nombres, escribe cada nombre una sola vez y únelos con , . Una lista vacía se escribe como none.

El código proporcionado lee a los invitados y las llegadas como líneas separadas por comas e imprime cada línea devuelta.

Pruébalo tú mismo

guest_report <- function(invited, arrivals) {
  # Escribe tu código aquí
  character(0)
}

# Código de entrada/salida suministrado: mantenlo tal como está
input <- suppressWarnings(readLines(file("stdin")))
cat(guest_report(strsplit(input[1], ",")[[1]], strsplit(input[2], ",")[[1]]), sep = "\n")