[R] Another Plotting Hint - changing fill color for points

[Jason Rupert]

This worked great. 


Regarding the second question - can you expound a bit more on the effect of the device?  Right now, as shown by the test code because I am on a Windows machine and need to import the image to Word I am using WMF.  Is there a better device that I should use that will help with the presolution of the points that are drawn?  For example, I can see white pixesl on the blue circles, and notice that is not a perfect circle.  Thanks for any information about a better way to go:

win.metafile(file=as.character(figure_file_name_and_path), pointsize = 10)
plot(-4:4, -4:4, type = "n")# setting up coord. system
points(vals_201, vals_200, col = "red", bg = "grey", pch=21, cex =1..7)
#points(vals_201, vals_200, col = "grey", bg = "white", pch=21, cex =1.5)
points(rnorm(100)/2, rnorm(100)/2, col = "blue", bg = "blue",  pch=21, cex =1.5)
dev.off()


Thanks again. 

--- On Wed, 8/12/09, Sarah Goslee <sarah.goslee at gmail.com> wrote:

> From: Sarah Goslee <sarah.goslee at gmail.com>
> Subject: Re: [R] Another Plotting Hint - changing fill color for points
> To: "Jason Rupert" <jasonkrupert at yahoo.com>, "r-help" <r-help at r-project.org>
> Date: Wednesday, August 12, 2009, 4:56 PM
> Yes, you can do that. You need to
> specify pch in the range of 21-25,
> and can then
> specify both col and bg (background color). Oddly, the help
> for this option is
> under ?points rather than ?par or ?pch, but there are many
> examples.
> 
> Your second question would depend heavily on the device you
> use and its
> associated settings, but using the above solution should
> solve your problem.
> 
> Sarah
> 
> On Wed, Aug 12, 2009 at 5:29 PM, Jason Rupert<jasonkrupert at yahoo.com>
> wrote:
> >
> > Is it possible to change the fill color of a point?
>  For example, the outer color being "Blue" and inner color
> being "Grey".
> > I've tried changing "col" and "bg", but that does not
> seem to have the desired effect.
> >
> > Below is another attempt, but the pixel resolution of
> the points function does not appear to be high enough for
> this to work:
> >
> > figure_file_name_and_path<-paste("Test.wmf",
> sep="")
> >
> > vals_200<-rnorm(200)
> > vals_201<-rnorm(200)
> >
> >
> win.metafile(file=as.character(figure_file_name_and_path),
> pointsize = 10)
> > plot(-4:4, -4:4, type = "n")# setting up coord.
> system
> > points(vals_201, vals_200, col = "blue", bg = "white",
> pch=19, cex =1.7)
> > points(vals_201, vals_200, col = "grey", bg = "white",
> pch=19, cex =1.5)
> > points(rnorm(100)/2, rnorm(100)/2, col = "blue", bg =
> "white",  pch=19, cex =1.5)
> > dev.off()
> >
> > As a second question, is there any way to increase the
> pixel resolution of the points produced on the plot so that
> they are perfect circles.  I just noticed that the fill
> does not perfectly fill the points on the plot and there are
> some pixels outside the circle.
> >
> > Thanks again.
> >
> 
> 
> -- 
> Sarah Goslee
> http://www.functionaldiversity.org
>