R programming - ggplot2 boxplot labeling by group issue

1
votes

Currently I have a data frame where I want to plot three variables into one boxplot:

  livingsetting        factor                  outcome
1      1                CKD                         2
2      1                CKD                        13
3      1                CKD                        23
4      13               CKD                        12
5      7                CKD                       -14

The livingsetting variable contains factors "1", "7", and "13". The factor variable contains factors "CKD", "HD", and "Transplant". The outcome variable is a continuous outcome variable.

This is my code for the boxplot:

ggplot(df, aes(x = interaction(livingsetting, factor),  
y= outcome)) + geom_boxplot(aes(fill = livingsetting)) + xlab("Factors")+ ylab("Y")

And my plot looks like this:

dd

The x-axis labels show 1.CKD, 13.CKD, 7.CKD, 1.HD, 13.HD, etc., but is it possible to tweak the xlab part so that the boxplot shows "CKD", "HD", and "Transplant" as the labels? (so that each of the individual plots are grouped by threes).

For example, the first red, green, and blue plots will be labeled as "CKD" (as the group), the second red, green, and blue plots will be labeled as "HD", etc.

2
rggplot2boxplotlabels
What if you use aes(x = factor, y = outcome, fill = livingsetting)? Works only if livingsetting really is a factor, else transform to factor... If I understood correctly what you are looking for, you don't need the interaction. – Tino
might be a way to do it with regex (extract first group before dot) but here's a manual method stackoverflow.com/questions/5096538/customize-axis-labels – Robert Tan

2 Answers

1
votes

Here is an example illustrating my comment from above. You don't need interaction, since each aesthetic will create another boxplot:

df <- read.table(text = "  livingsetting        factor                  outcome
1      7                BLA                         2
2      1                BLA                        13
3      1                CKD                        23
4      13               CKD                        12
5      7                CKD                       -14", header = T, row.names = 1)

df$livingsetting <- as.factor(df$livingsetting)

library(ggplot2)

ggplot(data = df, aes(x = factor, y = outcome, fill = livingsetting)) + 
    geom_boxplot()
0
votes

Is there a reason not to use facet_wrap or facet_grid? Unless I'm misunderstanding what you're looking for, this is a perfect use-case for faceting, and then you don't need interaction.

You should be able to change to this:

ggplot(df, aes(x = livingsetting, y = outcome)) +
    geom_boxplot(aes(fill = livingsetting)) +
    facet_wrap(~ factor)

This uses the dataframe as is, rather than getting the interaction, and adds labels for the factor variable to the tops of the facets, rather than on the tick labels (though you could do that if that's something you want).

Hope that helps!