如何在ggplot2中更改轴标签颜色？

library(ggplot2)

# 创建一个示例数据集
data <- data.frame(
  x = 1:10,
  y = rnorm(10)
)

# 创建一个ggplot对象
p <- ggplot(data, aes(x = x, y = y)) +
  geom_point()

# 更改轴标签颜色
p + theme(
  axis.text.x = element_text(color = "red"),  # 更改x轴标签颜色
  axis.text.y = element_text(color = "blue")   # 更改y轴标签颜色
)

p + theme(
  axis.title.x = element_text(color = "green"),  # 更改x轴标题颜色
  axis.title.y = element_text(color = "purple")   # 更改y轴标题颜色
)