在R中绘制颜色矢量

# 安装和加载必要的包
install.packages("ggplot2")
library(ggplot2)

# 创建数据集
data <- data.frame(
  x = rnorm(100),
  y = rnorm(100),
  z = rnorm(100)
)

# 使用ggplot2绘制散点图，颜色代表z变量的值
ggplot(data, aes(x = x, y = y, color = z)) +
  geom_point() +
  scale_color_gradient(low = "blue", high = "red") +
  labs(title = "Color Vector Plot in R", x = "X Axis", y = "Y Axis", color = "Z Value")

ggplot(data, aes(x = x, y = y, color = z)) +
  geom_point() +
  scale_color_gradientn(colors = c("blue", "green", "yellow", "red")) +
  labs(title = "Improved Color Mapping", x = "X Axis", y = "Y Axis", color = "Z Value")

# 使用色盲友好的颜色方案
library(RColorBrewer)
brewer.pal(11, "Spectral")

ggplot(data, aes(x = x, y = y, color = z)) +
  geom_point() +
  scale_color_gradientn(colors = brewer.pal(11, "Spectral")) +
  labs(title = "Color Blind Friendly Plot", x = "X Axis", y = "Y Axis", color = "Z Value")