我正在用ggplot做散点图.我想有一个特定的 colored颜色 和填充点(在plotcolour="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_point年中,我try 添加shape=21,就像我在plot年所做的那样)

  scale_colour_manual(values=c("A"="chocolate3","B"="cyan4")) +
  scale_fill_manual(values=c("A"="green", "B"="red")) + #DOES NOTHING...
  xlim(7,47) + ylim(7,47)+ ... etc.

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

在此处输入图像描述

这就是我加上"shape=21"后得到的结果.在这两种情况下,它都忽略了scale_fill

我还try 在geom_point中添加fill=c("blue","red"),但R抱怨:"错误:设置美学的长度不兼容:形状、大小、填充".

有什么建议吗?我的代码中的scale_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 to 25的形状.这些是具有colourfill属性的:

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

如果你想要colour种不同的 colored颜色 ,那么:

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"))

R相关问答推荐

如何在条形图中用零线分割负条和正条?

用逗号分隔的引号连接字符串

R滚动添加或删除计数到列表

如何根据优先级单词列表(使用for循环和条件)查找和替换df中的值?

expss表输出的rbinding表错误

dplyr:通过迭代向量来根据某些条件填充列

列出到 knitr 环境(在 R 块中使用 list2env 时出现 R-markdown 错误)

在R中递归添加一列

如何将列变成R中的列名

如何在 R 中对“配对”向量进行排序

网络元素名称的几种组合的正则表达式

提取向量中某个符号最后一次出现后的字符

如何让我的数据正确呈现?

R pivot_longer 带有存根名称和最后一个下划线

通过(非统一)名称连接两个数据集

将字符向量中元素的唯一组合连接到 R 中的新字符串向量中

不能用 r 中的特殊字符改变字符串

使用 for 循环遍历方程中的两个不同的值序列

R数据框中不同组的卡方检验

如何用前一列中的最后一个非缺失值填充 NA?