R help - Apr 2011 - Simple question about symbols()

I'm new to R and i'm having some trouble with a bubble chart.
Basically I have 3 series (a,b,c), but the third one is a binnary variable
(assumes only 0 or 1 to the entire data).
How can I use these binnary information to make 2 different colours in a
bubble chart?. I.e., I'm using this code:


symbols(inv$a, inv$b, circles=radius, inches=0.35, fg="white",
bg="red", xlab="aa", ylab="bb", add=TRUE)

and i want the bg color to be red if c=1 and blue if c=0.

thanks,

Murilo

--
View this message in context:
http://r.789695.n4.nabble.com/Simple-question-about-symbols-tp3461676p3461676.html
Sent from the R help mailing list archive at Nabble.com.

murilofm <murilofmoraes <at> gmail.com> writes:
> 
> I'm new to R and i'm having some trouble with a bubble chart.
> Basically I have 3 series (a,b,c), but the third one is a binnary variable
> (assumes only 0 or 1 to the entire data).
> How can I use these binnary information to make 2 different colours in a
> bubble chart?. I.e., I'm using this code:
> 
  Probably:

symbols(inv$a, inv$b, circles=radius, inches=0.35, fg="white",
   bg="red", xlab="aa", ylab="bb", add=TRUE,
   col=c("blue","red")[inv$c+1])

Thanks for the answer; I see that
col=c("blue","red")[inv$c+1] creates a
vector of "red" and "blue" associated with the binnary c.
But still I got everything red.

--
View this message in context:
http://r.789695.n4.nabble.com/Simple-question-about-symbols-tp3461676p3462013.html
Sent from the R help mailing list archive at Nabble.com.

On Apr 19, 2011, at 10:51 PM, murilofm wrote:
> Thanks for the answer; I see that
col=c("blue","red")[inv$c+1]
> creates a
> vector of "red" and "blue" associated with the binnary
c.
> But still I got everything red.
If you want tested solution, submit test data.
>
> --
> View this message in context:
http://r.789695.n4.nabble.com/Simple-question-about-symbols-tp3461676p3462013.html
> Sent from the R help mailing list archive at Nabble.com.
-- 

David Winsemius, MD
West Hartford, CT

The link to the csv file is

http://www.filedropper.com/data_5

I use the "d" variable to create the radius:

radius <- sqrt( inv$d/ pi )

and i tried

symbols(inv$a, inv$b, circles=radius, inches=0.35, fg="white",
   bg="red", xlab="aa", ylab="bb",
   col=c("blue","red")[inv$c+1])

Thanks for the help.

--
View this message in context:
http://r.789695.n4.nabble.com/Simple-question-about-symbols-tp3461676p3462882.html
Sent from the R help mailing list archive at Nabble.com.