p <- ggplot(mpg, aes(x= displ, y= hwy, fill = drv)) +
geom_bar(stat = "identity") +
scale_fill_manual(values = c("forestgreen", "blue", "deepred"))
Run Code Online (Sandbox Code Playgroud)
当我添加以下代码来更改图例标签时:
p + scale_fill_discrete(labels = c("4wd", "front", " rear"))
Run Code Online (Sandbox Code Playgroud)
我收到此错误警告:
“填充”的比例已经存在。添加另一个比例“填充”,这将取代现有比例。
因此它会替换现有的比例并返回到第一个比例。如何预防?
library(ggplot2)
library(ggrepel)
set.seed(1234)
ss <- sample(1:32, 10)
df <- mtcars[ss, ]
ggplot(df, aes(wt, mpg))+ geom_point(col = "red") +
geom_label_repel(aes(label = rownames(df), fill = factor(cyl)), size = 5,
hjust = 1,fontface = 3)
Run Code Online (Sandbox Code Playgroud)