如何用R中的向量元素划分矩阵的列?