ggplot(mtcars, aes(x = hp, y = wt)) + geom_point() + stat_smooth() + geom_segment(aes(x = 100, y=5, xend=200, yend=5), lineend = 'square', ...
確定! 回上一頁