R 如何在ggplot2的图例中包含一个标签的希腊/plotmath字符

R 如何在ggplot2的图例中包含一个标签的希腊/plotmath字符,r,ggplot2,R,Ggplot2,我有以下代码,有三种AR水平和四种饮食。我设置了以下绘图: require(ggplot2) set.seed(123) ChickWt <- data.frame(ChickWeight, AR = sample(c("p=0", "p=1", "hat(p)"), size = 578, replace = T)) p1 <- ggplot(ChickWt, aes(x=Time, y=weight, colour=Diet, Group = Chick, linetype =

我有以下代码,有三种AR水平和四种饮食。我设置了以下绘图:

require(ggplot2)
set.seed(123)
ChickWt <- data.frame(ChickWeight, AR = sample(c("p=0", "p=1", "hat(p)"), size = 578, replace = T))

p1 <- ggplot(ChickWt, aes(x=Time, y=weight,
colour=Diet, Group = Chick, linetype = AR)) + geom_line()
p1
require(ggplot2)
种子集(123)
这似乎成功了:

exprvec <- expression( hat(p), p==0, p==1)
p1  + scale_linetype_manual(values=1:4, labels = exprvec)

exprvec谢谢!我如何让图例进入两个独立的栏目,一个是AR,一个是Diet?我尝试添加:+guides(fill=guides\u legend(ncol=2))但没有效果,可能是因为这是两个独立的图例?我不明白您想要什么。有两个独立的列。是不是希望他们在一起?默认情况下,有一个图例框,但您可以将其移动到左上角区域,在该区域中,它不会干扰线条,使用:
+主题(legend.position=c(0.1,0.75))
,它们现在根据背景显示为“独立”。