如何在R矩阵中减去另一列?