ACF Plot with ggplot2: Setting width of geom_bar

Question

With acf we can make ACF plot in base R graph.

x <- lh
acf(x)

Answer 1

You're probably better off plotting with line segments via geom_segment()

library(ggplot2)

set.seed(123)
x <- arima.sim(n = 200, model = list(ar = 0.6))

bacf <- acf(x, plot = FALSE)
bacfdf <- with(bacf, data.frame(lag, acf))

q <- ggplot(data = bacfdf, mapping = aes(x = lag, y = acf)) +
       geom_hline(aes(yintercept = 0)) +
       geom_segment(mapping = aes(xend = lag, yend = 0))
q