如何通过函数设置R ggplot中点的颜色？

library(ggplot2)

# 创建一个数据框
data <- data.frame(
  x = c(1, 2, 3, 4, 5),
  y = c(2, 4, 6, 8, 10),
  group = c("A", "A", "B", "B", "C")
)

# 创建一个ggplot对象，并设置x、y轴以及点的颜色
p <- ggplot(data, aes(x, y, color = group)) +
  geom_point()

# 设置点的颜色为自定义颜色
p <- p + scale_color_manual(values = c("A" = "red", "B" = "blue", "C" = "green"))

# 显示图形
print(p)