如何使用ggplot2隐藏图例的部分？

library(ggplot2)

# 创建一个简单的数据集
data <- data.frame(x = c(1, 2, 3), y = c(4, 5, 6), z = c("A", "B", "C"))

# 使用ggplot2绘制散点图
p <- ggplot(data, aes(x = x, y = y, color = z)) +
  geom_point() +
  scale_color_discrete(guide = FALSE) # 隐藏图例

# 显示图形
print(p)