如何在 R 中更改條形與 Y 軸之間的距離

Question

如何在 ggplot 中更改從條形到 Y 軸的距離？

k <- c("a","b","c","d","e","f")
j <- c(3,500,1000,1,2,6)

df <- data.frame(k,j)

ggplot(df, aes(y=reorder(k, -j), x=j))+
  geom_col(fill="#70A2E7",  width = 0.85)+
  theme_bw(10)+
  geom_text(aes(label=j), size=3.5, angle= 0, hjust=-0.05)

圖表

Answer 1

您可以在scale_x_continuous()中使用expand ：

library(ggplot2)
#Data
k <- c("a","b","c","d","e","f")
j <- c(3,500,1000,1,2,6)
df <- data.frame(k,j)
#Plot
ggplot(df, aes(y=reorder(k, -j), x=j))+
  geom_col(fill="#70A2E7",  width = 0.85)+
  theme_bw(10)+
  geom_text(aes(label=j), size=3.5, angle= 0, hjust=-0.05)+
  scale_x_continuous(expand = c(0,0),limits = c(NA,1100))

Output：