gpt4 book ai didi

r - 在ggplot2中叠加多边形并使叠加透明

转载 作者:行者123 更新时间:2023-12-02 04:54:39 25 4
gpt4 key购买 nike

我想用 ggplot 叠加几个多边形。覆盖层的填充应该是透明的,但它们的边框应该是红色的。我只想看到第一个多边形的填充,所以我想使覆盖层透明......但我无法让它们完全透明。不知何故,我会更容易将填充颜色定义为无填充......但我不知道该怎么做。有什么想法吗?

这里是一些重现示例的代码:

    ids <- factor(c("1.1", "2.1", "1.2", "2.2", "1.3", "2.3"))

values <- data.frame(
id = ids,
value = c(3, 3.1, 3.1, 3.2, 3.15, 3.5)
)

positions <- data.frame(
id = rep(ids, each = 4),
x = c(2, 1, 1.1, 2.2, 1, 0, 0.3, 1.1, 2.2, 1.1, 1.2, 2.5, 1.1, 0.3,
0.5, 1.2, 2.5, 1.2, 1.3, 2.7, 1.2, 0.5, 0.6, 1.3),
y = c(-0.5, 0, 1, 0.5, 0, 0.5, 1.5, 1, 0.5, 1, 2.1, 1.7, 1, 1.5,
2.2, 2.1, 1.7, 2.1, 3.2, 2.8, 2.1, 2.2, 3.3, 3.2)
)

datapoly <- merge(values, positions, by=c("id"))

p <- ggplot(datapoly, aes(x=x, y=y)) + geom_polygon(aes(fill=value, group=id))
# overlay the same plot with red borders and transparent fill
p <- p + geom_polygon(aes(group=id, alpha=1),colour="red",size=1.1)
p

without overlay with overlay

最佳答案

如果您不想填充第二组geom_polygon,只需将fill设置为NA即可。

ggplot(datapoly, aes(x=x, y=y)) + 
geom_polygon(aes(fill=value, group=id)) +
geom_polygon(aes(group=id), alpha=1,colour="red", fill=NA, size=1.1)

enter image description here

在这种情况下,您不需要两次 geom_polygon 调用

ggplot(datapoly, aes(x=x, y=y)) + 
geom_polygon(aes(fill=value, group=id), colour="red", size=1.1)

关于r - 在ggplot2中叠加多边形并使叠加透明,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/14716384/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com