一个R语言绘制散点图的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

大家好！我有一个R语言plot函数的问题，以下举个例子。文件名为test.txt。

> dat <- read.table("test.txt", header = T)
> dat

Gene	Expression1	Expression2	Group
At50	5.33	1.62	A
At51	4.80	2.59	A
At52	4.79	2.20	A
At53	4.39	1.30	A
At54	4.29	3.65	A
At55	3.98	7.50	B
At56	3.87	0.89	B
At57	3.70	1.47	A
At58	3.57	1.18	A
At59	3.51	2.27	A

> attach(dat)
> plot(Expression1, Expression2)


此时，我得到了一张散点图。但我想把Group为A的点标为蓝色色，把Group为B的点标为红色，如何实现此功能？

盼大家的回复。

致谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：R语言 散点图 Expression express Xpress 散点图 如何

R语言不怎么懂，但是一直想尝试着去学习下。感觉还是蛮有用的语言。

plot(Expression1, Expression2,col=factor(group))

trier2006 发表于 2013-8-9 10:04
plot(Expression1, Expression2,col=factor(group))

非常谢谢！还有一个问题，我想把A点设为灰色，B点设为红色，这样可以强调B点（默认色是黑色和红色，不能突出B点）。谢谢！

pony2001mx 发表于 2013-8-9 14:21
非常谢谢！还有一个问题，我想把A点设为灰色，B点设为红色，这样可以强调B点（默认色是黑色和红色，不能突 ...

col=c("grey","red")

不确定是不是你要的，大概就这个办法，自己多试试。

plot( Expression1, Expression2,col=ifelse(factor(group)=="A","grey", "red") )

Thank you very much!

mark一下，我也早找这个问题的解决方式

trier2006 发表于 2013-8-9 10:04
plot(Expression1, Expression2,col=factor(group))

怎么做文本标注呢？就是在散点图上标注相应的文本，谢谢！

wuchm 发表于 2014-11-8 17:01
怎么做文本标注呢？就是在散点图上标注相应的文本，谢谢！

legend(locator(1), c("Factor A", "Factor B"), col=c("grey","red"))

locator（1）需要你鼠标点击一下，你需要在plot上放着这些注释信息的地方。
当然，你如果自己有确定的坐标（x,y), 你也可以改成自动的：
legend(x,y , c("Factor A", "Factor B"), col=c("grey","red"))