# geom\_point

```
ggplot(gapminder, 
aes(x=gdpPercap, y=lifeExp, color=continent)) +
geom_point() + geom_smooth(method='loess', formula='y~x') +
facet_wrap(~continent)
```

![](https://4253921594-files.gitbook.io/~/files/v0/b/gitbook-legacy-files/o/assets%2F-MhiOx8KkYnYxHHqfUbB%2F-MjQLaUTaj1cut3FpLEd%2F-MjQLmBvmZI6wZhJW59R%2Fimage.png?alt=media\&token=200e3a9a-7296-4246-b3c2-cec087d00134)

For smooth graphs