Hi there,

does any one know how to plot the both d1 and d2 data in one unique x and y
axis?

thanks
Alireza


convertToRadius<-function(x){return(sqrt(x/pi))}

myd=data.frame(x=c(84390255386 ,74390255386, 78028317380 ,53594648044,422)
               ,y=c(949849442 ,941645043, 840135292, 74, 821632939)
               ,z=c(0.005641896, 0.005641896 ,0.005641896,
0.007978846,0.007978846))


v=max(myd$z)*0.80
d1=myd[myd$z<v,]
d2=myd[myd$z>=v,]

par(plt=c(0.1,0.92,0.1,1))
myd =d1
z=cvtToRadius(myd$z)*scale
y=myd$y
x=myd$x
plot(x,y,cex=z,col='red')

par(plt=c(0.1,0.92,0.1,1),new=TRUE)
myd =d2
z=cvtToRadius(myd$z)*scale
y=myd$y
x=myd$x
plot(x,y,cex=z,col='green')

        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to