我试图使用ggplot绘制一个条形图，但结果图在y轴上减少，而应该增加：

data_mat_2 <- data.frame(data_mat_2)  
ggplot(data = data_mat_2, aes(x = data_mat_2$months, y = data_mat_2$numbers)) +
  geom_bar(stat = "identity") +
  xlab("") +
  ylab("")

如果你能给予我一些解决这个问题的建议，我将不胜感激。