( ggplot(mpg, aes(x='displ', y='hwy')) + geom_point() + geom_smooth() + labs(x='displacement', y='horsepower') )