8 histograme
ggplot(data=weather, aes(x=temp))+
geom_histogram(binwidth = 10, color='white', fill='tomato')## Warning: Removed 1 rows containing non-finite values (`stat_bin()`).

ggplot(data=weather, aes(x=temp))+
geom_histogram(bins = 20, color='white', fill='tomato', alpha=0.4)## Warning: Removed 1 rows containing non-finite values (`stat_bin()`).

ggplot(data=weather, aes(x=temp))+
geom_histogram(bins = 20, color='white', aes(fill=origin))## Warning: Removed 1 rows containing non-finite values (`stat_bin()`).

ggplot(data=weather)+
geom_histogram(aes(x=temp), binwidth = 10, fill='tomato', alpha=0.2)+
geom_histogram(aes(x=dewp), binwidth = 10, fill='lightblue', alpha=0.4)## Warning: Removed 1 rows containing non-finite values (`stat_bin()`).
## Removed 1 rows containing non-finite values (`stat_bin()`).
