如果我使用ggplot2创建一个绘图并使用单独的,比方说,形状和填充刻度来描绘数据,我希望图例将描绘“白色”填充点(看起来是空心的)和“黑色”填充点(其中看起来不是空洞的。)
在下面的示例代码中,Windows的图例项应为白色空心点,Linux的图例应为黑色点
“操作系统”下的图例项描述了两个视觉上相同的点,这些点是明显不同的操作系统,其点在图上用不同的填充清晰地绘制。在下面的示例代码中,Windows和Linux在图例中显示为无法区分的黑色空心点,即使它们在绘图本身上的绘制方式也不同。
library(ggplot2)
x <- rnorm(n = 30)
y <- rnorm(n = 30)
treatment <- rep(c("red", "green", "blue"), times = 20)
operatingSystem <- rep(c("Windows", "Linux"), times = 30)
dd <- data.frame(x, y, treatment, operatingSystem)
fillScaleValues <- c(
"Windows" = "white",
"Linux" = "black"
)
shapeScaleValues <- c(
"red" = 21,
"green" = 22,
"blue" = 23
)
p <- ggplot(
aes(x = x,
y = y,
shape = factor(treatment),
fill = factor(operatingSystem)
), data = dd
)
p <- p + geom_point()
p <- p + scale_fill_manual(values = fillScaleValues, name = "Operating System")
p <- p + scale_shape_manual(values = shapeScaleValues, name = "Treatment")
p
R version 2.15.1 (2012-06-22)
Platform: x86_64-apple-darwin9.8.0/x86_64 (64-bit)
locale:
[1] C/en_US.UTF-8/C/C/C/C
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] ggplot2_0.9.2.1 reshape2_1.2.1 plyr_1.7.1 ProjectTemplate_0.4-2
[5] testthat_0.7
loaded via a namespace (and not attached):
[1] MASS_7.3-21 RColorBrewer_1.0-5 colorspace_1.1-1 dichromat_1.2-4
[5] digest_0.5.2 evaluate_0.4.2 grid_2.15.1 gtable_0.1.1
[9] labeling_0.1 memoise_0.1 munsell_0.4 proto_0.3-9.2
[13] scales_0.2.2 stringr_0.6.1 tools_2.15.1
答案 0 :(得分:14)
您必须覆盖图例中使用的形状,如this question中所示。
因此,使用您的示例代码(顺便提一下,感谢清晰,可重现的问题),您需要做的就是:
p + guides(fill = guide_legend(override.aes = list(shape = 21)))
它可以为您提供所需内容: