5. 这两张图看起来会不同吗？为什么相同/不同？

ggplot(data = mpg, mapping = aes(x = displ, y = hwy)) + geom_point() + geom_smooth() ggplot() + geom_point( data = mpg, mapping = aes(x = displ, y = hwy) ) + geom_smooth( data = mpg, mapping = aes(x = displ, y = hwy) )

6. 重新创建生成以下图形所需的 R 代码。