How to scale a bar plot using ggplot2?

Question

I want my bar plot to take up less space, currently there is a lot of white space which is not neccessary. I would like the bins to be a lot closer than they currently are. And since there are only two categories in the X axis I do not see why there is so much space between them. - increasing the bin width would make white space go away, but then the bins become unnaturally large.

Code:

# Creates plot to show response-rate
hubspot_ordering %>% 
    ggplot(aes(x = Replied)) +
        geom_bar(color = "black", 
                 fill = "steelblue",
                 stat = "count",
                 width = 0.1,
                 position = position_dodge(0.9)) +
        xlab("Kommuners respons på e-post og oppringing") +
        scale_x_discrete(labels = c("Besvart",
                                    "Ingen respons")) +
        ylab("Antall kommuner") +
        theme(element_line(size = 0.5)) +
        theme_bw() -> plot_response_rate

Output:

Answer 1

You can change the aspect.ratio in your theme using the following code:

df <- data.frame(x=factor(LETTERS[1:2]), y=sample(1:100, 2))
library(ggplot2)
ggplot(data=df, aes(x=x, y=y, width=.1)) + 
  geom_bar(stat="identity", position="identity") +
  theme(aspect.ratio = 2/1) +
  labs(x="", y="") 

Output aspect.ratio=2 :

Output aspect.ratio=1 :