# dati
data(SLID, package = "carData")

# bordo del grafico
par(bty = "l")

# boxplot semplice
boxplot(SLID$wages, main="Retribuzioni")

# variabili standardizzate
boxplot(scale(SLID[1:3]))

# bivariato
boxplot(wages ~ sex, data=SLID, 
        names = c("Donne", "Uomini"))