如何将文本粘贴到R中ggplot2图形中的数字y轴刻度上？

library(ggplot2)
data <- data.frame(x = 1:5, y = c(10, 20, 30, 40, 50))
plot <- ggplot(data, aes(x = x, y = y)) + geom_point()

plot <- plot + geom_text(aes(label = y, x = 0, y = y))

plot <- plot + theme(axis.text.y = element_text(size = 10, color = "black"))

library(ggplot2)
data <- data.frame(x = 1:5, y = c(10, 20, 30, 40, 50))
plot <- ggplot(data, aes(x = x, y = y)) + geom_point()
plot <- plot + geom_text(aes(label = y, x = 0, y = y))
plot <- plot + theme(axis.text.y = element_text(size = 10, color = "black"))
plot