Riepilogo - Regole di sconto

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

Sfida

Medio

Un negozio applica una serie di regole di prezzo a un prezzo, una dopo l’altra. Completa la lista rules con queste funzioni anonime che prendono un prezzo:

half: dividi il prezzo per 2
minus5: sottrai 5, ma non scendere mai sotto 0
tax: aggiungi il 10%
round: arrotonda a un numero intero con round()

Poi completa apply_rules(price, names): applica nell’ordine le regole indicate in names e restituisci una riga per ogni regola, after half: 20.00, seguita da final: e dal prezzo finale. Mostra ogni prezzo con due cifre decimali.

Il codice fornito legge il prezzo e un elenco di nomi di regole separati da virgole e stampa ogni riga restituita.

Provalo tu

rules <- list(
  # Scrivi qui il tuo codice
)

apply_rules <- function(price, names) {
  # Scrivi qui il tuo codice
  character(0)
}

# Codice di input/output fornito: lascialo così com'è
input <- suppressWarnings(readLines(file("stdin")))
cat(apply_rules(as.numeric(input[1]), strsplit(input[2], ",")[[1]]), sep = "\n")