다음과 같이 geom_abline() 를 사용하여 실험했습니다. p <- ggplot(mpg, aes(cty, hwy)) + geom_point() p + geom_abline() + facet_wrap(~cyl)
確定! 回上一頁