[R] ggplot2 - facetting

[ONKELINX, Thierry]

Hi Pedro,

I think that the code below gives you the plot you want. Notice that you
don't have to add everthing seperatly. But you can if you feel the need
to do so.

ggplot(plotdata2, aes(x = x, y = y)) + geom_point() + facet_grid(group ~
.) 

plot0 <- ggplot(plotdata2, aes(x = x, y = y))
layer1 <- geom_point()
facets <- facet_grid(group ~ .)
plot0 + layer1 + facets

But this doesn't work because the variable 'group' is not defined in
plot0.

plot0 <- ggplot()
layer1 <- geom_point(data = plotdata2, aes(x = x, y = y))
facets <- facet_grid(group ~ .)
plot0 + layer1 + facets

With that information, you can alter your code. Notice that I've moved
data=plotdata2 from layer() to ggplot().

plot0<-ggplot(data=plotdata2)
layer1<-layer(mapping=aes_string(x='x',y='y'),geom='point',
stat='identity')
scaleY<-scale_y_continuous()
scaleX <- scale_x_continuous()
Facets<-facet_grid(group ~ .)
plot0+layer1 +scaleY + scaleX + facet_grid(group~.)

HTH,

Thierry

------------------------------------------------------------------------
----
ir. Thierry Onkelinx
Instituut voor natuur- en bosonderzoek / Research Institute for Nature
and Forest
Cel biometrie, methodologie en kwaliteitszorg / Section biometrics,
methodology and quality assurance
Gaverstraat 4
9500 Geraardsbergen
Belgium 
tel. + 32 54/436 185
Thierry.Onkelinx op inbo.be 
www.inbo.be 

To call in the statistician after the experiment is done may be no more
than asking him to perform a post-mortem examination: he may be able to
say what the experiment died of.
~ Sir Ronald Aylmer Fisher

The plural of anecdote is not data.
~ Roger Brinner

The combination of some data and an aching desire for an answer does not
ensure that a reasonable answer can be extracted from a given body of
data.
~ John Tukey

-----Oorspronkelijk bericht-----
Van: r-help-bounces op r-project.org [mailto:r-help-bounces op r-project.org]
Namens Pedro de Barros
Verzonden: dinsdag 25 maart 2008 15:50
Aan: r-help op stat.math.ethz.ch
Onderwerp: [R] ggplot2 - facetting
Urgentie: Hoog

Dear All,

After having overcome the issue of legends (thanks, Thierry, once 
more), I am trying to use facetting, but here also I can not find how 
to do this. I do not want to use qplot, but rather the more flexible 
options. However, it seems I am doing still something pretty stupid, 
because I always get an error, even if it seems I am doing everything 
like the examples.

My code is below.
set.seed(123)
plotdata2<-data.frame(x=rep((1:4),4), y=rep(0.1*(1:4),4), 
group=sample(factor(rep(1:4,rep(4,4)), labels=c('Class1', 'Class2', 
'Class3', 'Class4'))))
plotdata2 <- plotdata2[order(plotdata2[,'group']),]
plot0<-ggplot()
layer1<-layer(data=plotdata2, 
mapping=aes_string(x='x',y='y'),geom='point', stat='identity')
scaleY<-scale_y_continuous()
scaleX <- scale_x_continuous()
Facets<-facet_grid(group ~ .)
plot1<-plot0+layer1 +scaleY + scaleX + facet_grid(group~.)

plot1

I always get the error message:
Error in check_formula(formula, varnames) :
   Formula contains variables not in list of known variables

Thanks for any help you can provide.

Best,
Pedro

______________________________________________
R-help op 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.