如何将大于阈值的值转换为 R 中矩阵列中的 1?