从 data.frame 到 ggplot2 图例的表达式

我想向图例条目添加一个表达式，而不直接输入图例（因为我正在循环变量）。本质上我想要这样：

d <- data.frame(x=1:10,y=1:10,f=rep(c("0–74",">=75"),each=5))
qplot(x,y,data=d,color=f)   

以这样的方式输出：

qplot(x,y,data=d,color=f) +
scale_colour_manual(values=1:2,breaks=c("0–74",">=75"),
labels=c(expression(0<=75), expression("">=75)))

（但实际上我希望第一个条目 0

我确信这是某种设置，但我尝试过的一切都不起作用。有任何想法吗？

我认为你可以在循环中使用以下方法来完成此操作parse(text=)将字符串转换为适当的表达式。所以你可以设置scale_colour_manual通过从 f 变量中获取字符串并以如下方式传递它们来使用适当的标签（可能需要进行一些调整）：

scale_colour_manual(...,labels=c(parse(text=lab1),parse(text=lab2)))

虽然解析不喜欢">=75"所以你可能会想要类似的东西"''>=75".

例如：

qplot(x, y, data = d, color = f) +
  scale_colour_manual(
    values = 1:2,
    breaks = c("0–74", ">=75"),
    labels = c(parse(text = "0-74"),
               parse(text = paste("''",">=75",sep=""))))