如何调整ggplot中数据点顺序：让Factor 1显示在Factor 2之前

要解决Factor 2显示在Factor 1上方的问题，核心是明确指定Factor变量的因子水平顺序，同时优化y轴Trait的排序逻辑，具体修改如下：

关键修改步骤 #

• 指定Factor的因子水平顺序：将Factor列转换为因子，明确Factor 1为第一个水平，确保ggplot优先处理该组数据
• 优化y轴Trait排序：使用forcats::fct_inorder保持Trait的原始出现顺序，替代原代码中易出错的reorder写法
• 显式指定分组：在aes中添加group=Factor，确保dodge逻辑正确作用于分组

修改后的完整代码 #

library(tidyverse)
library(forcats)

# 使用示例数据
data <- examp_data

# Calculate confidence intervals
data <- data %>%
  mutate(Lower_CI = B - 1.96 * SE,
         Upper_CI = B + 1.96 * SE)

# Extract Factor information from Trait column (formatted as sbp_f1, sbp_f2 etc)
data <- data %>%
  mutate(Factor = case_when(
    grepl("_1$", Trait) ~ "Factor 1",
    grepl("_2$", Trait) ~ "Factor 2",
    TRUE ~ NA_character_
  ),
  # 明确指定Factor的水平顺序，让Factor 1在前
  Factor = factor(Factor, levels = c("Factor 1", "Factor 2")),
  Trait = gsub("_1$|_2$", "", Trait))

# Forest plot 
forest_plot <- ggplot(data, aes(x = B, y = fct_inorder(Trait), color = Factor, group = Factor)) +
  geom_point(position = position_dodge(width = 0.5)) +
  geom_errorbar(aes(xmin = Lower_CI, xmax = Upper_CI), width = 0.0, position = position_dodge(width = 0.5)) +
  scale_x_continuous(limits = c(-0.13, 0.13)) +
  geom_vline(xintercept = 0, linetype = "dashed", color = "black") +  
  theme_minimal()

# 查看绘图
print(forest_plot)

说明 #

• 通过factor(Factor, levels = c("Factor 1", "Factor 2"))强制指定Factor的顺序，ggplot在使用position_dodge时会按照该顺序排列点，确保Factor 1出现在上方（靠近对应Trait标签的位置）
• fct_inorder(Trait)会根据Trait列在数据中首次出现的顺序创建因子，完美保留你原始数据中的Trait排序（SBP→DBP→BMI...），比原代码中reorder(Trait, -seq_along(Trait))的逻辑更清晰可靠
• 显式添加group=Factor可以避免因颜色映射的潜在优先级问题，确保分组逻辑正确生效

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