创建全零矩阵很容易
X <- matrix(0, 10, 10)
现在注意到R中的矩阵存储为具有附加维度的向量
> str(X) num [1:10, 1:10] 0 0 0 0 0 0 0 0 0 0 ...
所以,如果你想插入1一个随机位置,而不是在长度为N*M的向量中选择一个随机位置,并将其替换为值
1
X[sample(10*10, 1)] <- 1