我有如下的情节如下。它是用下面的命令创建的:

library(ggplot2)

df <- data.frame(cond = factor(rep(c("A", "B"), each = 200)), 
                 rating = c(rnorm(200), rnorm(200, mean=.8)))

ggplot(df, aes(x=rating, fill=cond)) + 
geom_density(alpha = .3) +
xlab("NEW RATING TITLE") +
ylab("NEW DENSITY TITLE")

现在,我想把传说标题从cond修改为NEW legend title。

所以,我只是添加了下面的行添加上述代码的结尾:

+labs(colour="NEW LEGEND TITLE")

但这并不奏效。正确的做法是什么?


当前回答

许多人花费大量时间更改标签、图例标签、标题和轴的名称,因为他们不知道可以在R中加载包含空格“”的表。然而,你可以这样做来节省时间或减少代码的大小,通过指定分隔符当你加载一个表,例如用制表符(或任何其他分隔符,而不是默认或单个空格):

read.table(sep = '\t')

或者使用CSV格式的默认加载参数:

read.csv()

这意味着您可以直接在原始数据文件中保留“NEW LEGEND TITLE”作为列名(标题),以避免在每个图中指定新的图例标题。

其他回答

唉,这些解决方案对我都不起作用。我正在使用brms::conditional_effects()的输出。

我的解决方案需要:

+实验室(fill = "新标题",color = "新标题",labels = "新标题")

我要告诉你的方法,将允许你用一个公式来改变图例,轴,标题等的标签,你不需要使用记忆多个公式。这不会影响字体风格或标签/标题和轴的文本设计。

下面是我对这个问题的完整回答。

 library(ggplot2)
 rating <- c(rnorm(200), rnorm(200, mean=.8))
 cond <-factor(rep(c("A", "B"), each = 200))
 df <- data.frame(cond,rating 
             )

 k<- ggplot(data=df, aes(x=rating, fill=cond))+ 
 geom_density(alpha = .3) +
 xlab("NEW RATING TITLE") +
 ylab("NEW DENSITY TITLE")

 # to change the cond to a different label
 k$labels$fill="New Legend Title"

 # to change the axis titles
 k$labels$y="Y Axis"
 k$labels$x="X Axis"
 k

我已经将ggplot输出存储在变量“k”中。你可以给它取任何你喜欢的名字。后来我用过

k$labels$fill ="New Legend Title"

更改图例。“fill”用于显示不同颜色的标签。如果你有标签显示大小,比如1点代表100,其他点代表200等等,那么你可以使用这样的代码-

k$labels$size ="Size of points"

它会改变标签标题。

我没有深入研究,但因为你在ggplot()中使用了fill=cond,

 + labs(color='NEW LEGEND TITLE') 

可能没起作用。无论你用填充代替颜色,它都是有效的!

+ labs(fill='NEW LEGEND TITLE') 

我在ggplot2_2.1.0中使用了这种方法

为了添加到列表中(这里的其他选项对我不起作用),你还可以为ggplot使用update_labels函数:

p <- ggplot(df, aes(x=rating, fill=cond)) + 
           geom_density(alpha=.3) + 
           xlab("NEW RATING TITLE") + 
           ylab("NEW DENSITY TITLE")
update_labels(p, list(colour="MY NEW LEGEND TITLE")

这也将允许您更改x轴和y轴标签,使用单独的行:

update_labels(p, list(x="NEW X LABEL",y="NEW Y LABEL")

将此添加到混合,当你改变了颜色。这也适用于我的qplot与两个离散变量:

p+ scale_fill_manual(values = Main_parties_color, name = "Main Parties")