ggplot2 中的希腊符号：geom_boxplot答案

【问题标题】：Greek Symbols in ggplot2 : geom_boxplotggplot2 中的希腊符号：geom_boxplot
【发布时间】：2014-02-10 01:17:44
【问题描述】：

我正在尝试将希腊符号放在我用 ggplot2 制作的箱线图中。但是，在完成了所有关于堆栈溢出的先前问题之后，我终其一生都无法让他们的任何示例发挥作用。

抱歉，如果有人可以在这里帮助我，我将不胜感激。

到目前为止我的代码是：

## Data
names = LETTERS[1:3]
x = runif(99)
y = rep(names, length = length(x))
Parameters = factor(rep(c("Lambda", "Phi", "Gamma"), each = length(names)), 
                    levels = c("Lambda", "Phi", "Gamma"))
plot.df = data.frame(x, y, Parameters)
limits = quantile(plot.df[,1], probs = seq(0.1,0.9,by=0.1))
##Create Plot
dodge = position_dodge(width=0.5)
p = ggplot(plot.df, aes(x = y,y = x, colour = Parameters)) +
    geom_boxplot(aes(shape = Parameters), outlier.shape = 19, outlier.colour = NULL, outlier.size = 0.8) +
        scale_shape_manual(values = rep(19, 3)) +
            scale_y_continuous(limits = c(0, 1)) +
                coord_flip() + labs(title = "TITLE", x = "", y = "") + 
                xlim(rev(names)) +
                theme(legend.position = "right")
print(p)

这给出了：

代码中有许多位是我的真实数据所必需的（即重新组织 x 轴（即 y 轴）等）

我希望将图例值更改为希腊字母，但我完全不知道如何做到这一点。

谢谢

【问题讨论】：

你试过this吗？
嗨，不，我以前没有尝试过。我试了一下，它使用了似乎来自网格包的“单元”功能 - 不适用于 R 3.0.0，你知道它是否被带到了不同的包中吗？
grid 应该预先安装在 R 3.x.x 中。试试library(grid)。
您可能需要加载网格。使用 lattice 和 ggplot2，它只是附加的而不是满载的。
啊，是的。这确实有效，尽管它绘制了旧图例和新图例，并且改变了颜色。我尝试更改 legend.position = "none": 但这删除了两个图例

标签： r ggplot2

【解决方案1】：

从你的脚本继续，

my.labs <- list(bquote(lambda),bquote(phi),bquote(gamma))

p <- p+
  scale_colour_manual(values=1:3,breaks=c("Lambda", "Phi", "Gamma"),
                      labels=my.labs)+
  scale_shape_manual(values=rep(19, 3),breaks=c("Lambda", "Phi", "Gamma"),
                      labels=my.labs)
print(p)

了解详情

【讨论】：

嗨，谢谢 - 这看起来可行，但我还没有尝试过。你能告诉我 scale_shape_manual 函数中 values=rep(19,3) 的意义吗？
对。需要手动颜色和手动形状规范以防止创建两个图例。（相当奇怪的设计。）如果您想要大写字母，那么只需将希腊字母名称大写即可。
@SamPassmore, values=rep(19,3) 只是为了保留您定义的 shape 值。你当然可以重新定义它们。同样，您可以通过在scale_colour_manual 中设置values 来定义自己的颜色，其中我为“黑色”、“红色”和“绿色”设置了 1:3。