Riepilogo - Sportello titoli

Fa parte della sezione Logica e flusso del percorso R di Coddy. Lezione 11 di 64.

Sfida

Medio

Completa process_orders(stock, orders). Gestisci gli ordini nell’ordine in cui arrivano e restituisci una riga per ciascuno:

unknown <item> quando l’articolo non è presente in stock
out of <item> quando la sua quantità è 0
sold <item> altrimenti, e la sua quantità diminuisce di 1

Dopo gli ordini, aggiungi una riga per ogni articolo in magazzino, in ordine alfabetico: <item>: <quantity>.

Il codice fornito legge le scorte come coppie name=quantity e gli ordini come una riga separata da virgole, quindi stampa ogni riga restituita.

Provalo tu

process_orders <- function(stock, orders) {
  # Escribe tu código aquí
  character(0)
}

# Código de entrada/salida proporcionado: déjalo tal como está
input <- suppressWarnings(readLines(file("stdin")))
stock <- c()
for (pair in strsplit(input[1], ",")[[1]]) {
  kv <- strsplit(pair, "=")[[1]]
  stock[kv[1]] <- as.numeric(kv[2])
}
cat(process_orders(stock, strsplit(input[2], ",")[[1]]), sep = "\n")