R 查找两列的值是否错误切换

我有个问题要解决。我需要一些代码/想法来发现在某个特定时间，数据集的列的值是否被错误地切换

例如，我有一个数据集，其中第1列只能包含（1,2），第2列只能包含（3,4）

对于在某个时间出错的事情，我看到：

Column 1      Column2

1                 3
2                 3
2                 3
1                 4
3                 1
4                 2
4                 1
3                 1

---

这只是一个让我的问题更清楚的例子。当更新的值放在错误的列中时，如何自动检测？

只要值不在

c（1，2）

中，即

d5[!d5$V1 %in% c(1, 2),] <- d5[!d5$V1 %in% c(1, 2), 2:1]
d5
#  V1 V2
#1  1  3
#2  2  3
#3  2  3
#4  1  4
#5  1  3
#6  2  4
#7  1  4
#8  1  3

---

d5[！d5$V1%in%c（1，2），]对不起，可能我不清楚。在我的家庭作业中，数据集每天都在更新，观察的次数非常多。我的目的是在发生类似示例的切换时发送信号。
d5[!d5$V1 %in% c(1, 2),] <- d5[!d5$V1 %in% c(1, 2), 2:1]
d5
#  V1 V2
#1  1  3
#2  2  3
#3  2  3
#4  1  4
#5  1  3
#6  2  4
#7  1  4
#8  1  3