Try to put a reproducible example of data, like this:
# with a toy data, this script run well.
CrownVolume <- data.frame(
Art = c("Species 1", "Species 2", "Species 3", "Species 4", "Species 5"),
Crown_volume_May = c(15.2, 20.3, 10.5, 7.8, 25.1))
ggplot(CrownVolume, aes(x = Art, y = Crown_volume_May, fill = Art)) +
geom_bar(stat = "identity") +
ylim(0, 30) +
labs(title = "May CVP",
x = "Species",
y = "CVP (m³)")
2 Likes