求助：如何在RStudio中绘制变量关联组合点图？

你要绘制的是仅显示上三角区域的变量两两组合散点矩阵，以下是两种适合新手的实现方式：

方法一：基础R自带函数（无需额外安装包） #

1. 准备数据 #

假设你的数据是数据框格式，每一列对应一个变量（如K、Q、W），每一行是一组测试组合的数值。这里先给一个模拟数据示例，你替换成自己的真实数据即可：

# 模拟示例数据，替换为你的真实数据
set.seed(123)
df <- data.frame(
  K = rnorm(50),
  Q = rnorm(50),
  W = rnorm(50),
  E = rnorm(50),
  R = rnorm(50)
)

2. 绘制上三角散点图 #

通过自定义面板函数，只保留上三角区域的散点：

# 定义上三角面板：绘制散点
upper_panel <- function(x, y) {
  points(x, y, pch = 16, col = "#2E86AB") # pch控制点形状，col控制点颜色
}
# 定义下三角面板：留空不绘制内容
lower_panel <- function(x, y) {}

# 生成最终图形
pairs(df, upper.panel = upper_panel, lower.panel = lower_panel, main = "变量测试组合散点矩阵")

方法二：ggplot2+GGally包（样式更灵活） #

如果想要更美观、可自定义的样式，推荐用GGally包（基于ggplot2）：

1. 安装并加载包 #

install.packages("GGally") # 首次使用需安装
library(GGally)
library(ggplot2)

2. 绘制图形 #

ggpairs(df,
        upper = list(continuous = "points"), # 上三角绘制散点
        lower = list(continuous = "blank"), # 下三角留空
        diag = list(continuous = "blank"), # 对角线留空（不需要变量分布可保留）
        title = "变量测试组合散点矩阵") +
  theme_bw() # 切换简洁主题

你还可以调整点的大小、颜色，比如修改为：

upper = list(continuous = wrap("points", size = 2, color = "#E74C3C"))

注意事项 #

• 如果你的变量是分类类型，可将points替换为count等适配的绘图逻辑；
• 所有示例中的df需替换为你自己的真实数据框，确保列名与你的变量一致。

内容的提问来源于stack exchange，提问作者Nina Becher