匹配数据集中的值并重写以消除某些II型错误

Question

我有两个数据集的预测。预测1与实际值高度相关，而预测2与实际值高度不相关。我的实际数据包含50,000种具有相同结构的预测。我想匹配与预测1和预测2（0,0和1,1）相同的所有值，但是对于不匹配的预测1和2（0,1或1,0），我会我想将预测2字符串从1更改为0，将0更改为1。我有预测=预测数据帧。要我希望数据看起来像=观察到的数据帧。因此，预测1 =观察到1，预测2 =观察到2（我想要的样子）。

#--------Dataset
prediction1<-c(1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0)
prediction2<-c(1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0)
predictions<-data.frame(prediction1,prediction2)

#--------Want I want the dataset to look like
observed1<-c(1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0)
observed2<-c(1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,0,0,0,0,0)
observed<-data.frame(observed1,observed2)

Answer 1

听起来您想要两列都包含BaseClass结果的列。

prediction1