如何在ggplot2中绘制一个时间轴上的总共多行

install.packages("ggplot2")

library(ggplot2)

data <- data.frame(
  time = c("2022-01-01", "2022-02-01", "2022-03-01"),
  total_rows = c(100, 200, 150)
)

data$time <- as.Date(data$time)

plot <- ggplot(data, aes(x = time, y = total_rows))

plot + geom_line()

plot + geom_line() + 
  labs(title = "Total Rows Over Time", x = "Time", y = "Total Rows")