如何为组分配和创建具有不同符号的散点图?

时间:2012-11-17 17:04:23

标签: r subset scatter-plot

我正在分析援助组织的数据,其中一些是多边的,一些是双边的。

我想只选择双边并将它们分配给一个变量,并将其分配给多边。

我该怎么做?

以下是数据文件https://dl.dropbox.com/u/56475675/datos_aid_R.ZIP

> short<-scan("short.txt",what=list(""))
Read 72 records
> country<-scan("country.txt")
Read 72 items
> total<-scan("total.txt")
Read 72 items
> short<-scan("short.txt",what=list(""))
Read 72 records
> donortag<-scan("donortag.txt",what=list(""))
Read 72 records
> total<-scan("total.txt")
Read 72 items
> organization<-scan("organization.txt")
Read 72 items
> country<-scan("country.txt")
Read 72 items
> activity<-scan("activity.txt")
Read 72 items

在子集化之后,我将创建一个带有标签的散点图,但我想用红色正方形绘制双边(例如),以及带有蓝色圆圈的多边形(例如),...

如何在散点图中使用不同的绘图符号?

在这里你可以看到我在R

中做了什么

http://img13.imageshack.us/img13/8844/snap1226.png http://img13.imageshack.us/img13/8844/snap1226.png

1 个答案:

答案 0 :(得分:0)

并不是绝对清楚你想要在散点图的轴上想要什么,而是有以下几点:

d <- data.frame(short,total,country,donortag,activity)
d2 <- droplevels(subset(d,donortag %in% c("Bilateral","Multilateral")))
cols <- c("red","blue")
pchs <- 1:2
with(d2,plot(total,activity,col=cols[donortag],pch=pchs[donortag]))

library(ggplot2)
qplot(total,activity,data=d2,colour=donortag,pch=donortag)