我有一个包含两列基因符号的数据框。 如果在第二列中也找到了第一列中的基因符号，则希望将第二列的值切换到第一列中。
作为一个基本示例：
gene1 <- c("A2M", "A2M", "CDKN1A")
gene2 <- c("AMBP", "ANXA6", "A2M")
df <- cbind(gene1, gene2)
names(df) <- c("gene1", "gene2")
产生：
gene1 gene2
1 A2M AMBP
2 A2M ANXA6
3 CDKN1A A2M
我希望输出在第三行中切换“ A2M”，使其在gene1列中，而“ CDKN1A”将在gene2列中。
赞：
gene1 gene2
1 A2M AMBP
2 A2M ANXA6
3 A2M CDKN1A
我如何对第一列中的所有值执行此操作？