i <- ggplot(mtcars, aes(wt, mpg)) + geom_point() # Add segment i + ... Set legend title and labels p + scale_fill_discrete(name = "Dose", labels = c("A", ...
確定! 回上一頁