Error when establishing an axis limit in a barplot

[Tired22]

Hi!
I have been trying to create a barplot with a variety of features, including a limit on the y axis. However, I keep getting an error in aesthetics. This is the code and the error:

ggplot(CrownVolume1, aes(x=Art., y=Crown_volume_May, fill=Art., ylim = c(0, 30)))+
geom_bar(stat="identity") +
labs(title = "May CVP",
x = "Species",
y = "CVP (m³)")

Error in check_aesthetics():
! Aesthetics must be either length 1 or the same as the data (9): ylim
Run rlang::last_error() to see where the error occurred.

---

Backtrace:

1. base (local) <fn>(x)
2. ggplot2:::print.ggplot(x)
3. ggplot2:::ggplot_build.ggplot(x)
4. ggplot2 (local) by_layer(function(l, d) l$compute_aesthetics(d, plot))
5. ggplot2 (local) f(l = layers[[i]], d = data[[i]])
6. l$compute_aesthetics(d, plot)
7. ggplot2 (local) f(..., self = self)
8. ggplot2:::check_aesthetics(evaled, n)
   Run rlang::last_trace() to see the full context.

rlang::last_trace()
<error/rlang_error>
Error in check_aesthetics():
! Aesthetics must be either length 1 or the same as the data (9): ylim

---

Backtrace:
▆

1. ├─base (local) <fn>(x)
2. └─ggplot2:::print.ggplot(x)
3. ├─ggplot2::ggplot_build(x)
4. └─ggplot2:::ggplot_build.ggplot(x)

5. └─ggplot2 (local) by_layer(function(l, d) l$compute_aesthetics(d, plot))
   

6.   └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
   

7.     └─l$compute_aesthetics(d, plot)
   

8.       └─ggplot2 (local) f(..., self = self)
   

9.         └─ggplot2:::check_aesthetics(evaled, n)
   

10.           └─rlang::abort(...)
    

[nirgrahamuk]

ylim should never be inside aes()
Its either its own standalone function that is + plussed on, or you are plussing on a scale_x_* function and setting a limit on that.

[M_AcostaCH]

First check the correct name of columns.

Maybe is Art
what happen if you use geom_col() inside geom_bar() ?

Like said @nirgrahamuk , in the aes() not put ylim attributes .

[Tired22]

I have taken it out of aes() and now I get a different error:

ggplot(CrownVolume1, aes(x=Art., y=Crown_volume_May, fill=Art.))+
geom_bar(stat="identity") +
ylim = c(0, 30) +
labs(title = "May CVP",
x = "Species",
y = "CVP (m³)")
Error in c(0, 30) + labs(title = "May CVP", x = "Species", y = "CVP (m³)") :
non-numeric argument to binary operator

[Tired22]

Nothing changes if I do

ggplot(CrownVolume1, aes(x=Art., y=Crown_volume_May, fill=Art.))+
geom_bar(geom_col(stat="identity")) +
ylim = c(0, 30) +
labs(title = "May CVP",
x = "Species",
y = "CVP (m³)")

I still get the error

Error in c(0, 30) + labs(title = "May CVP", x = "Species", y = "CVP (m³)") :
non-numeric argument to binary operator

I have checked column names and they are ok, it is indeed "Art."

[M_AcostaCH]

Try to put a reproducible example of data, like this:

FAQ: How to do a minimal reproducible example ( reprex ) for beginners

A minimal reproducible example consists of the following items: A minimal dataset, necessary to reproduce the issue The minimal runnable code necessary to reproduce the issue, which can be run on the given dataset, and including the necessary information on the used packages. Let's quickly go over each one of these with examples: Minimal Dataset (Sample Data) You need to provide a data frame that is small enough to be (reasonably) pasted on a post, but big enough to reproduce your issue. Let's say, as an example, that you are working with the iris data frame head(iris) #> Sepal.Length Sepal.Width Petal.Length Petal.Width Species #> 1 5.1 3.5 1.4 0.…

# 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³)")

[scottyd22]

I think @M_AcostaCH's example solves it. Change ylim = c(0, 30) to ylim(0, 30).

[Tired22]

It has indeed fixed it. Thank you for pointing it out, I didn't see it at first glance.
Now I have obtained the desired plot. However, I wanted to eliminate the species names in the X axis, since they are redundant. I have tried with different commands, but I have only been able to eliminate the axis title. Any idea on how I could achieve this? Thank you.

[scottyd22]

You should be able to add on the following to the end of your plot code:

theme(axis.text.x = element_blank()

[Tired22]

Works perfectly. Thank you very much.