3.43 Histogram a wykres pudełkowy - przykład (3)

# Dla tych samych danych, dla porównania, rysujemy histogram i krzywe gęstości
hist <- ggplot(data = data) + geom_histogram( aes( x = wzrost, y = ..density.., fill = plec ), bins = 6, alpha = 0.7 ) + geom_density( aes( x = wzrost, y = ..density.., colour = plec ) ) + theme_classic() # Rysuje histogram
print(hist)