Question

Mathematica 如何生成这种矩阵？

如何生成这种随机矩阵？
如何生成m*n的随机矩阵，使矩阵中每个元素为0或1或-1，且每列中有k1个1,k2个-1,其中m,n,k1,k2是整数.
谢谢!

Answer 1

k1 = 2; k2 = 3; m = 8; n = 4; c =
Join[ConstantArray[1, k1], ConstantArray[-1, k2],
ConstantArray[0, m - k2 - k1]];
Transpose@Table[RandomSample[c], {n}](*//MatrixForm*)