R ggplot中几何点（比例颜色手册）的填充和边框颜色

我正在用ggplot做散点图。我希望有一个特定颜色和填充的点（例如，在

绘图
，
color=“blue”，fill=“cyan4”
），但我找不到方法。我要说的是：

ggplot(df, aes(own,method)) +
  panel.configuration +
  scale_shape_identity() +  #to use the 'plot' shape format.
  geom_point(aes(color = factor(label)), position = "jitter",size=3) +  

（在前面的
geom_点
中，我尝试添加
shape=21
，就像我在
绘图中所做的那样）

这就是我在没有“shape=21”的情况下得到的结果


这就是我在添加“shape=21”时得到的结果。在这两种情况下，它都会忽略
scale\u fill

我还尝试在geom_point中添加
fill=c（“蓝色”、“红色”）
，但R抱怨：“错误：集合美学的长度不兼容：形状、大小、填充”

关于如何得到它有什么建议吗？我的代码中的
scale\u fill
有什么问题

多谢各位

数据（df）看起来像：

21 15 A
24 16 A
24 17 A
28 14 A
24 15 A
22 15 A
20 18 A
24 18 A
34 9 B
38 12 B
41 19 B
42 13 B
36 12 B
40 17 B
41 14 B
37 12 B
40 13 B
37 15 B
35 15 B

您必须使用从
21到25的形状。这些是具有
颜色
和
填充
属性的：

ggplot(df, aes(own, method)) + 
     geom_point(colour="white", shape=21, size = 4, 
     aes(fill = factor(label))) + 
     scale_fill_manual(values=c("blue", "cyan4"))

如果您还需要不同颜色的
颜色
，则：

ggplot(df, aes(own, method)) + 
      geom_point(aes(colour=factor(label), 
      fill = factor(label)), shape=21, size = 4) + 
      scale_fill_manual(values=c("blue", "cyan4")) + 
      scale_colour_manual(values=c("white", "black"))

谢谢你，阿伦。你的建议效果很好，但它用相同的颜色填充了所有的点。是否可以像在
绘图中那样为每个图形指定特定的颜色？我会编辑它以提供数据。是的。这是可能的。我只是在寻找一个数据来创建绘图…）@PGreen，尝试此编辑。如果在
aes（.）
（编辑）中插入
color
，则可以使用
scale\u color\u手册（值=…）
对
color
执行相同操作。颜色/填充将根据因子的级别进行分配。完美！就这样！最后，只有2色是有意义的，但我想添加边框，因为我应用了抖动和边框有助于可视化拥挤的区域。颜色和填充的不同颜色只是一个exta细节，只是为了尊重我在
plot
中旧脚本的格式。非常感谢Arun，真的很有帮助，很有效率；-）
ggplot(df, aes(own, method)) + 
      geom_point(aes(colour=factor(label), 
      fill = factor(label)), shape=21, size = 4) + 
      scale_fill_manual(values=c("blue", "cyan4")) + 
      scale_colour_manual(values=c("white", "black"))