ggplot2：更改图例中的符号

Question

我遇到问题，使我的情节图例中的符号与情节本身中的符号相匹配。

假设数据有四列，如

data = data.frame(x = sample(1:10, 10, replace=TRUE), y = sample(1:10, 10, replace=TRUE), 
           Rank = sample(1:10, 10, replace = TRUE), Quantified = factor(sample(1:2, 10, replace = TRUE))
)

我希望点数不同（由'Rank'区分）并用不同的符号表示（十字和空心圆，由'Quantified'区分）。

我的代码是

ggplot(data, aes(x = x, y = y)) +
          geom_point(aes(size = Rank, shape = Quantified)) +
          scale_shape_manual("Quantified", labels = c("Yes", "No"), values = c(1, 4)
 )

情节中的符号是我想要的。

我的问题是，我希望顶部图例中的圆圈未填充，因为它们在图中。

我在代码的不同部分尝试了各种命令（例如，fill =“white”）但似乎没有什么工作正常。

有什么建议吗？

Answer 1

现在我确定这是你想要的：

library(scales)
ggplot(data, aes(x = x, y = y)) +
          geom_point(aes(size = Rank, shape = Quantified)) +
          scale_shape_manual("Quantified", labels = c("Yes", "No"), values = c(1, 4)) + 
          guides(size = guide_legend(override.aes = list(shape = 1)))