如何批量将R语言dataframe的Genes列指定基因名移入新列Genes2？

基础R实现步骤 #

1. 先定义你需要筛选的12个目标基因列表：

target_genes <- c("ERRFI1", "ENO1", "PGD", "DHRS3", "PRDM2", "KAZN", 
                  "FBXO42", "MRTO4", "PLA2G2A", "PLA2G5", "ECE1", "AZIN2")
# 注意：替换成你实际需要的12个基因名称

2. 初始化Genes2列为NA，再批量匹配赋值：

# 新建Genes2列并初始化为NA
study$Genes2 <- NA
# 匹配目标基因的行，将对应Genes值填入Genes2
study$Genes2[study$Genes %in% target_genes] <- study$Genes[study$Genes %in% target_genes]

dplyr包实现（更简洁） #

如果你常用tidyverse工具链，用dplyr的mutate配合ifelse可以一步完成：

library(dplyr)

target_genes <- c("ERRFI1", "ENO1", "PGD", "DHRS3", "PRDM2", "KAZN", 
                  "FBXO42", "MRTO4", "PLA2G2A", "PLA2G5", "ECE1", "AZIN2")

study <- study %>%
  mutate(Genes2 = ifelse(Genes %in% target_genes, Genes, NA))

核心逻辑是用%in%运算符一次性匹配所有目标基因，替代逐个写==的重复操作，高效完成批量赋值。

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