在 qplot 中按组着色散点图

Question

我有一个如下所示的数据框 (data)：

Condition1   Condition2   Significant?
2.4           5.3            no
9.3           15.9           no
12.1          121.1          yes
0.2           151.3          yes

我正在读取 data.frame 并使用 qplot 绘制如下散点图：

data<-read.table("input.txt",header=TRUE, row.names=1)

con<-data[,1]
con<-data[,2]
sig<-data[,3]

qplot(con, exp, data = data) + 
geom_point(aes(color=sig), size=I(0.6))

我正在尝试：

a) 按重要性为点着色：'yes' = 红色，'no' = 黑色

b) 根据重要性调整点的大小：'yes' = size=I(0.8), 'no' = size=I(0.5)

我可以使用上面的代码生成默认配色方案，但我不知道如何为不同的组自定义颜色和大小 - 我想如果你知道 R 的方式，这很简单，但是我没有！

Answer 1

您可以使用scale_size_manual 和scale_colour_manual 设置颜色和大小，您应该将这两者都添加到aesthetics

dat <- read.table(text="Condition1   Condition2   Significant
2.4           5.3            no
9.3           15.9           no
12.1          121.1          yes
0.2           151.3          yes", header=T)

library(ggplot2)

ggplot(dat, aes(Condition1, Condition2, colour=Significant, size=Significant)) +
  geom_point() +
  scale_size_manual(values=c(0.5, 0.8)*10) +
  scale_colour_manual(values=c('no'="black", 'yes'="red"))