rggplot2boxplot

Plotting two variables in a boxplot ggplot2

I understand that others have asked this question and I have read and attempted the answers that people have provided, but I'm still not having luck. My R literacy isn't high enough yet and maybe there's something wrong with how I've organised my data?

I have two populations, a and b, and I want to compare leaf length and leaf width on the same boxplot. I can make a qplot of either individually, but not together.

data <- read.csv("Leaf.csv", header=TRUE)

data$AORB <- as.factor(data$AORB)

library(ggplot2); library(plyr)

qplot(mapping=aes(x=AORB,y=Leaf_length),data=data,
      main="Box Plot using qplot()",geom="boxplot",
      xlab="Country",ylab="Leaf Length")

Here is my data.

structure(list(AORB = structure(c(1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L), levels = c("a", "b"), class = "factor"), Leaf_length = c(290L,290L, 350L, 300L, 250L, 510L, 450L, 430L, 550L, 1000L), Leaf_width = c(200L,200L, 280L, 240L, 200L, 190L, 230L, 240L, 250L, 531L)), row.names = c(NA,-10L), class = "data.frame")

Can anyone assist me with the code? Please tell me if I haven't presented my data clearly.

Thank you!

Solution

  • The easiest option to achieve your desired result would be to reshape your data to long before plotting. Also note that qplot was deprecated in ggplot2 3.4.0:

    library(ggplot2)
library(tidyr)

dat_long <- data |>
  tidyr::pivot_longer(c(Leaf_length, Leaf_width),
    names_to = "stat", values_to = "value"
  )

ggplot(dat_long, aes(AORB, value, fill = stat)) +
  geom_boxplot() +
  labs(
    x = "Country"
  )