``` r library(ggplot2) pie <- ggplot(mtcars, aes(x = factor(cyl), fill = factor(cyl))) + geom_bar(width = 1) pie + coord_radial(theta = "x", inner.radius = 0.5) + scale_x_discrete(breaks = NULL, labels = NULL) #> Error in switch(params$position, theta.sec = -Inf, top = -Inf, right = -Inf, : EXPR must be a length 1 vector ``` <sup>Created on 2024-12-22 with [reprex v2.1.0](https://reprex.tidyverse.org)</sup> ~