ds %>%
filter(rainfall != 0) %>%
ggplot(aes(x=rainfall)) +
geom_density() +
scale_x_log10() +
theme(legend.position="none")
A common approach to dealing with the skewed distribution is to
transform the scale to be a logarithmic scale, base 10. The following
code produces Figure .
|