mpg$cyl <- as.factor(mpg$cyl) ggplot(mpg, aes(x = displ, y = hwy, color = cyl)) + geom_point(size = 4) + scale_color_manual(values = c('#009392', '#9ccb86', ...
確定! 回上一頁