Hi
Mulholland, Tom wrote:
Taking note of the first post, this is what I assume you wish. Note Paul's caveat in the help file
"If you resize the device, all bets are off!"
require(gridBase) x<-seq(0,1,0.2) y<-x pred<-matrix(c(0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.7, 0.7, 0.7, 0.7, 0.5, 0.5, 0.7, 0.9, 0.9, 0.7, 0.5, 0.5, 0.7, 0.9, 0.9, 0.7, 0.5, 0.5, 0.7, 0.7, 0.7, 0.7, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5), 6, 6) image(x, y, pred, col = gray(20:100/100), asp='s', axes=F, xlab=" ", ylab="") points(0.5, 0.5, col = 5) # the centre of the image
In this case, using grid (or gridBase) is probably overkill. The symbols() function should do what you want. For example, ...
symbols(rep(0.5, 4), rep(0.5, 4), circles=1:4, add=TRUE)
Paul
vps <- baseViewports() pushViewport(vps$plot) grid.circle(x=0.5, y=0.5, r=0.1, draw=TRUE, gp=gpar(col=5)) grid.circle(x=0.5, y=0.5, r=0.3, draw=TRUE, gp=gpar(col=5)) grid.circle(x=0.5, y=0.5, r=0.5, draw=TRUE, gp=gpar(col=5))
-----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Monday, 22 November 2004 1:21 PM To: [EMAIL PROTECTED] Subject: RE: [R] How to correct this
Hi there,
I would like to add a few circles to the following image: x<-seq(0,1,0.2)
y<-x
pred<-matrix(c(0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.7, 0.7, 0.7, 0.7,
0.5, 0.5, 0.7, 0.9, 0.9, 0.7, 0.5, 0.5, 0.7, 0.9, 0.9, 0.7, 0.5, 0.5,
0.7, 0.7, 0.7, 0.7, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5), 6, 6)
image(x, y, pred, col = gray(20:100/100), asp='s', axes=F, xlab=" ",
ylab="")
points(0.5, 0.5, col = 5) # the centre of the image
The centre of these circles needs to be overlapped with the centre of the image. Any helps are greatly appreciated. Regards, Jin
-----Original Message-----
From: Mulholland, Tom [mailto:[EMAIL PROTECTED] Sent: Monday, 22 November 2004 12:29 P
To: Li, Jin (CSE, Atherton)
Subject: RE: [R] How to correct this
I think you need to create a complete set of code that can be replicated by anyone trying to help. I ran the three grid.circle commands on my current plot and it did what I expected it to do. It plotted three circles centred in the current viewport. See the jpeg.
The last command using points makes me think that you need to understand about units and the setting up of viewports. I have not played around with this much but I think thr newsletter had an article which may be of use (although it uses old code I think the differences are minor)
Ciao, Tom
-----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Monday, 22 November 2004 10:07 AM To: [EMAIL PROTECTED] Subject: [R] How to correct this
Hi there,
I tried to add a few circles on an existing figure using the following codes
grid.circle(x=0.5, y=0.5, r=0.1, draw=TRUE, gp=gpar(col=5))
grid.circle(x=0.5, y=0.5, r=0.3, draw=TRUE, gp=gpar(col=5))
grid.circle(x=0.5, y=0.5, r=0.5, draw=TRUE, gp=gpar(col=5))
points(0.5, 0.5, col = 5) # centre of the circle
, but all circles moved away from the centre. Could we do any corrections to this? Thanks.
Regards,
Jin
==========================
Jin Li, PhD
Climate Impacts Modeller
CSIRO Sustainable Ecosystems
Atherton, QLD 4883
Australia
Ph: 61 7 4091 8802
Email: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
==========================
[[alternative HTML version deleted]]
______________________________________________ [EMAIL PROTECTED] mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
______________________________________________ [EMAIL PROTECTED] mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
______________________________________________ [EMAIL PROTECTED] mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
-- Dr Paul Murrell Department of Statistics The University of Auckland Private Bag 92019 Auckland New Zealand 64 9 3737599 x85392 [EMAIL PROTECTED] http://www.stat.auckland.ac.nz/~paul/
______________________________________________ [EMAIL PROTECTED] mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
