d1

d2

d3

d4
## `geom_smooth()` using method = 'loess'

d5