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

在 qplot 中按组着色散点图

Colouring scatter-plot by group in qplot

r

scatter-plot

ggplot2