792046_zh-CN

liliconcom

有没有办法不使用循环来用值 101..505 填充 5x5 矩阵？

肯定有办法！

循环版本：

ii = 1::5; jj = 1::5;

m = j(5,5);

foreach({i}, ii,
	foreach({j}, jj,
		m[i,j] = i*100 + j
	)
);

m;

#=> [ 101 102 103 104 105, 
	201 202 203 204 205, 
	301 302 303 304 305, 
	401 402 403 404 405, 
	501 502 503 504 505];

如果您有多种解决方案，欢迎提供！我正在尝试“熟练掌握”矩阵。

自动化和脚本回复：有没有办法不用循环就用值 101..505 填充 5x5 矩阵？

终于拿到了。不过不太好看

a = shape(mod(0::24, 5) + 1, 5);

#=> [1 2 3 4 5,
1 2 3 4 5,
1 2 3 4 5,
1 2 3 4 5,
1 2 3 4 5]

b = shape(floor(index(10, 58, 2) / 10), 5) * 100;

#=> [100 100 100 100 100,
200 200 200 200 200,
300 300 300 300 300,
400 400 400 400 400,
500 500 500 500 500]

a+b;

#=> [101 102 103 104 105,
201 202 203 204 205,
301 302 303 304 305,
401 402 403 404 405,
501 502 503 504 505]

回复：有没有办法不用循环就用值 101..505 填充 5x5 矩阵？

x = J( 5, 5, . );
Parallel Assign( {}, x[r, c] = 100 * r + c );
x;

[101 102 103 104 105,
201 202 203 204 205,
301 302 303 304 305,
401 402 403 404 405,
501 502 503 504 505]

或者

n = 5;
x = 1 :: n;
y = 100 * x;
Repeat( x, n ) + Repeat( y, n )`;

[101 102 103 104 105,
201 202 203 204 205,
301 302 303 304 305,
401 402 403 404 405,
501 502 503 504 505]

回复：有没有办法不用循环就用值 101..505 填充 5x5 矩阵？

(101::105) |/ (201::205) |/ (301::305) |/ (401::405) |/ (501::505)

回复：有没有办法不用循环就用值 101..505 填充 5x5 矩阵？

可能会很慢，但您也可以使用带有 J() 函数的 JSL 代码

Names Default To Here(1);

n = 5;

i = 1;
m = J(n, n, 
	Ceiling(i / n) * 100 + Mod(i++ - 1, n) + 1
);<BR /><BR />Write();