如何使用factor函数去除年份列前的X并设置标签以优化图表？

提取纯年份并转为因子 #

假设你的数据框名为df，Year列的格式如X2010、X2011这类，可按以下步骤操作：

1. 一步处理Year列（推荐）
   直接通过字符串替换去除X，同时转为因子，保证绘图时显示纯年份：

# 替换开头的X并转为因子，按年份升序排列水平
year_clean <- gsub("^X", "", df$Year)
df$Year <- factor(year_clean, levels = sort(unique(year_clean)))

2. 分步处理（便于调试）
   如果需要保留原列，可新建处理后的因子列：

# 第一步：提取纯年份字符串
df$clean_year <- gsub("^X", "", df$Year)
# 第二步：转为因子，按年份升序定义水平顺序
df$year_factor <- factor(df$clean_year, levels = sort(unique(df$clean_year)))

验证处理结果 #

执行以下代码查看因子水平，确认X已被移除：

levels(df$Year) # 或 levels(df$year_factor)

这样处理后，绘制图表时年份轴会显示2010、2011这类纯年份值，避免X前缀影响视觉效果。

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