R help - Jan 2022 - how to plot numeric variable against several categories with lattice bwplot?

Yes, I would like to have a boxplot of y against each of the other
variables, each into a separate panel, without having to type the
command for each pair (I have 23 categories in the real data...).
Thank you for the solid line code (I thought it might have been a
simple parameter to add...)

On Mon, Jan 17, 2022 at 4:22 AM Rolf Turner <r.turner at auckland.ac.nz>
wrote:
>
>
> On Thu, 13 Jan 2022 20:38:04 +0100
> Luigi Marongiu <marongiu.luigi at gmail.com> wrote:
>
> > Hello,
> > I have a numerical variable (x) and a series of categories. I would
> > like to make a box plot of x against each of the categories. How can I
> > arrange the data so that I can accomplish it with lattice?
> > At the moment I got this:
> > ```
> > df = data.frame(x = c(rep(1,5), rep(2,5), rep(3,5)),
> > y = rnorm(15),
> > f1 = rep(letters[1:5],3),
> > f2 = rep(letters[7:9],5),
> > f3 = c(rep(LETTERS[10:12],4), LETTERS[10:12]))
> > df$x = factor(df$x)
> > df$f1 = factor(df$f1)
> > df$f2 = factor(df$f2)
> > df$f3 = factor(df$f3)
> > library(lattice)
> > bwplot(y ~ x, data = df, auto.key = TRUE )
> > ```
> > Also, is it possible to have the wishers in solid line?
> > Thank you
>
> It is not at all clear to me what your are trying to do.  If you really
> want "to make a box plot of x against each of the categories",
you
> could just do:
>
> bwplot(x ~ f1, data = df, auto.key = TRUE )
> bwplot(x ~ f2, data = df, auto.key = TRUE )
> bwplot(x ~ f3, data = df, auto.key = TRUE )
>
> successively.  But perhaps you meant "y" rather than
"x".  Please
> clarify what you wish to accomplish.
>
> As to displaying the *whiskers* as solid lines ... that is one hell of
> a good question!  I had to struggle:
>
> xxx <- trellis.par.get("box.umbrella")
> xxx$lty <- 1
> trellis.par.set(box.umbrella=xxx)
> junk <- rnorm(42)
> bwplot(junk)
>
> That gave me a boxplot "lying on its side"; I wanted one
"standing up".
> After a great deal more struggle I did
>
> crud <- factor(rep(1,42),labels="")
> bwplot(junk ~ crud,ylab="")
>
> which gave me what I was after.
>
> Perhaps others who are more knowledgeable than I could chip in with
> better ideas.
>
> But first Luigi must clarify what he wants to obtain.
>
> cheers,
>
> Rolf Turner
>
> --
> Honorary Research Fellow
> Department of Statistics
> University of Auckland
> Phone: +64-9-373-7599 ext. 88276
>

-- 
Best regards,
Luigi

Hi Luigi

Not sure how to do it in lattice but in ggplot you could use for cycle

for(i in 3:5) {
print(ggplot(df, aes(x=df[,i], y=y))+geom_boxplot()+ xlab(names(df)[i]))
}

It is better to put plots to pdf file

Cheers
Petr
> -----Original Message-----
> From: R-help <r-help-bounces at r-project.org> On Behalf Of Luigi
Marongiu
> Sent: Monday, January 17, 2022 1:31 PM
> To: Rolf Turner <r.turner at auckland.ac.nz>
> Cc: r-help <r-help at r-project.org>
> Subject: Re: [R] how to plot numeric variable against several categories
with
> lattice bwplot?
> 
> Yes, I would like to have a boxplot of y against each of the other
variables, each
> into a separate panel, without having to type the command for each pair (I
have
> 23 categories in the real data...).
> Thank you for the solid line code (I thought it might have been a simple
> parameter to add...)
> 
> On Mon, Jan 17, 2022 at 4:22 AM Rolf Turner <r.turner at
auckland.ac.nz>
> wrote:
> >
> >
> > On Thu, 13 Jan 2022 20:38:04 +0100
> > Luigi Marongiu <marongiu.luigi at gmail.com> wrote:
> >
> > > Hello,
> > > I have a numerical variable (x) and a series of categories. I
would
> > > like to make a box plot of x against each of the categories. How
can
> > > I arrange the data so that I can accomplish it with lattice?
> > > At the moment I got this:
> > > ```
> > > df = data.frame(x = c(rep(1,5), rep(2,5), rep(3,5)), y =
rnorm(15),
> > > f1 = rep(letters[1:5],3),
> > > f2 = rep(letters[7:9],5),
> > > f3 = c(rep(LETTERS[10:12],4), LETTERS[10:12])) df$x =
factor(df$x)
> > > df$f1 = factor(df$f1)
> > > df$f2 = factor(df$f2)
> > > df$f3 = factor(df$f3)
> > > library(lattice)
> > > bwplot(y ~ x, data = df, auto.key = TRUE ) ``` Also, is it
possible
> > > to have the wishers in solid line?
> > > Thank you
> >
> > It is not at all clear to me what your are trying to do.  If you
> > really want "to make a box plot of x against each of the
categories",
> > you could just do:
> >
> > bwplot(x ~ f1, data = df, auto.key = TRUE ) bwplot(x ~ f2, data = df,
> > auto.key = TRUE ) bwplot(x ~ f3, data = df, auto.key = TRUE )
> >
> > successively.  But perhaps you meant "y" rather than
"x".  Please
> > clarify what you wish to accomplish.
> >
> > As to displaying the *whiskers* as solid lines ... that is one hell of
> > a good question!  I had to struggle:
> >
> > xxx <- trellis.par.get("box.umbrella") xxx$lty <- 1
> > trellis.par.set(box.umbrella=xxx)
> > junk <- rnorm(42)
> > bwplot(junk)
> >
> > That gave me a boxplot "lying on its side"; I wanted one
"standing up".
> > After a great deal more struggle I did
> >
> > crud <- factor(rep(1,42),labels="")
> > bwplot(junk ~ crud,ylab="")
> >
> > which gave me what I was after.
> >
> > Perhaps others who are more knowledgeable than I could chip in with
> > better ideas.
> >
> > But first Luigi must clarify what he wants to obtain.
> >
> > cheers,
> >
> > Rolf Turner
> >
> > --
> > Honorary Research Fellow
> > Department of Statistics
> > University of Auckland
> > Phone: +64-9-373-7599 ext. 88276
> >
> 
> 
> --
> Best regards,
> Luigi
> 
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> 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.