如何在R中创建具有非连续变量的条形图？

install.packages("ggplot2")  # 安装ggplot2包
library(ggplot2)  # 加载ggplot2包

data <- data.frame(category = c("A", "B", "C", "D"), count = c(10, 15, 8, 12))

plot <- ggplot(data, aes(x = category, y = count))

plot + geom_bar(stat = "identity")

plot + geom_bar(stat = "identity") +
  labs(title = "Non-continuous Bar Chart",
       x = "Category",
       y = "Count") +
  theme(plot.title = element_text(hjust = 0.5))