r语言 混淆矩阵的预测标签和真实标签位置对不上

在r语言对数据进行混淆矩阵预测时，发现混淆矩阵的预测结果和原始的标签对不上，因此无法确定预测的标签意义是什么！求各位解释一下或者如何改正！

生成的数据不正确