如何整理合并数据集以简化Facet Graph绘制？

1. 长格式是否更适合绘制带重叠直方图的Facet图？ #

绝对是。像ggplot2这类主流绘图工具天生适配长格式数据：

• 可以直接把Type变量映射到颜色/填充属性，轻松实现同一分面内的直方图重叠
• Facet分面能直接基于Type快速拆分图形，不用重复写多段代码处理不同列
• 后续调整图形（比如改分组、加统计量）时，只需要修改映射参数，不用重构数据逻辑，效率和可维护性都高很多

2. R语言中转换长格式的合适方法 #

最简洁高效的是用tidyr包的pivot_longer()函数，专门处理宽转长的场景。假设你的原始数据框叫df，代码示例如下：

# 先加载包
library(tidyr)

# 宽转长
long_df <- pivot_longer(
  data = df,
  cols = c(lwg_date, bon_date, lwg_length, bon_length), # 指定要转换的列（也可用everything()选所有列）
  names_to = c("Type", ".value"), # 拆分列名：第一部分存为Type，第二部分作为新列名
  names_pattern = "(.*)_(date|length)" # 正则表达式，捕获列名里的Type（lwg/bon）和属性（date/length）
)

这段代码会自动把列名里的lwg/bon提取为Type列的取值，同时把对应的date和length分别整理到同名列中，直接得到你需要的Type、date、length三列长格式数据。

如果习惯用旧版工具，也可以用reshape2包的melt()函数，但pivot_longer()的逻辑更直观，处理这类带结构化列名的宽数据时更省心。

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