On Tue, Feb 19, 2008 at 3:53 PM, sigalit mangut-leiba <[EMAIL PROTECTED]> wrote:
> Sorry to disturb,
>  I managed to plot 2 together with 'layer' like this:
>
>
>
>  qplot(se, or, min=lcl1, max=ucl1, data=df1, geom="pointrange")+layer(data =
>  df2, mapping = *aes*(x = se, y = OR2,min=lcl2,max=ucl2), geom =
>  "pointrange")+geom_line()

An easier way would be to do something like this:

df1$id <- 1
df2$id <- 2
df <- rbind(df1, df2)

qplot(se, or, min=lcl1, max=ucl1, colour=factor(id), data=df,
geom="pointrange") +
geom_line()

That way you get a nice legend too.

Hadley
-- 
http://had.co.nz/

______________________________________________
R-help@r-project.org mailing list
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