R新手求助：如何在ggplot2中设置y为行、x为列？

嘿，作为R新手碰到这种数据格式适配的问题太正常了！别担心，咱们一步步来解决——核心思路是先把你的宽格式数据转换成ggplot2偏好的长格式数据，然后就能轻松指定x轴为列、y轴为行啦。

第一步：把宽数据转成长数据 #

你的原始数据是每列对应一个变量（A-E），每行是一组观测。要让行号作为y轴，我们需要先给每行加一个唯一标识（行号），再把数据“拉长”：

# 先加载tidyverse包（包含ggplot2和数据转换工具）
library(tidyverse)

# 你的原始数据（调整了写法更规范，加随机种子让结果可复现）
set.seed(123)
df <- data.frame(
  A = rnorm(100, 35:65),
  B = rnorm(100, 25:35),
  C = rnorm(100, 15:20),
  D = rnorm(100, 5:10),
  E = rnorm(100, 0:5)
)

# 转换为长格式：添加行号，把列名转为分类变量
df_long <- df %>%
  mutate(行号 = row_number()) %>% # 新增行号列，作为y轴的依据
  pivot_longer(
    cols = -行号, # 除了行号之外的所有列都要转换
    names_to = "列名", # 原来的列名存到"列名"列里
    values_to = "数值" # 原来的单元格值存到"数值"列里
  )

第二步：用ggplot2绘图（x为列，y为行） #

现在数据格式对了，就可以自由绘图啦！这里给你两种常用的可视化方式：

方式1：热力图（展示每行每列的数值大小）

如果想直观看到每个单元格的数值差异，热力图是绝佳选择：

ggplot(df_long, aes(x = 列名, y = 行号)) +
  geom_tile(aes(fill = 数值)) + # 用颜色深浅表示数值
  scale_fill_viridis_c(option = "plasma") + # 可选：用更美观的配色
  labs(x = "列", y = "行", fill = "数值大小") +
  theme_minimal()

方式2：散点图（标记每行每列的位置）

如果只是想标记每行在各列的位置，或者结合数值做点的大小/颜色区分：

ggplot(df_long, aes(x = 列名, y = 行号)) +
  geom_point(aes(color = 数值), size = 2) + # 用颜色区分数值
  labs(x = "列", y = "行", color = "数值") +
  theme_bw()

小提示 #

• row_number()生成的行号完全对应你原始数据的行顺序，完美匹配y轴的“行”需求；
• pivot_longer是tidyverse里的新一代数据转换工具，比旧的melt函数更灵活，推荐日常使用；
• 如果数据行数很多导致y轴拥挤，可以用scale_y_continuous(breaks = seq(0, 100, 10))来调整y轴刻度间隔。

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