在R中生成具有特殊限制的矩阵

Question

我想创建两个随机生成的矩阵，第一个矩阵的行元素之和与R中第二个矩阵的列元素之和相等。 我知道如何创建随机生成的矩阵，为exapmle：

{{1}}

但是当我生成这两个矩阵时，我怎么能强加这个限制呢？

Answer 1

这样的事情对你有用：

size <- 10
matrix_1 <- matrix(nrow = size, ncol = size)
matrix_2 <- matrix(nrow = size, ncol = size)

for (i in seq_len(size)){
  vector <- rnorm(n=size, 1, 5)
  matrix_1[i,] <- vector
  matrix_2[,i] <- sample(vector, size)

}

唯一的问题是第二个矩阵不是完全随机的，它是第一个矩阵的随机样本。