Maple的for循环求助

[复制链接]

字体大小: 正常放大

No-one

1 主题	1 听众	1 积分

升级 20%

该用户从未签到

自我介绍: Maple初学者

电梯直达

1^#

发表于 2020-3-27 14:25 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

本帖最后由 No-one 于 2020-3-27 14:26 编辑

想通过Maple的for循环来把数据依次写入到一个零矩阵里，但结果是产生了一个table,矩阵里的0没有被替换，请问大佬们该如何修改。谢谢啦
#######################################
Qlist := [seq(i, i = 1 .. 2)];
klist := [seq(.1*i, i = 1 .. 2)];
WL_Matrix := Matrix(nops(Qlist), nops(klist), 0);
n := nops(Qlist);

for i to n do

for j to n do

eq5 := [solve(subs([Q = Qlist, k = klist[j]], W^2*W0*k+Q^2) = 0, W)];   q4 H3 m1 I+ |& U
; @: \7 J5 R5 V; z2 ~) g
WL_Marix[i, j] := eq5[1]; print(WL_Marix); ; a% E3 M: y( r; ?6 t  ]
4 c0 ?& w" c! ~, o  X: v
eq5 := assign['eq5']
/ @0 P' n5 F7 ]1 ~4 X
, }7 H. V) |+ k6 K& @ end do 1 J6 \. c9 ?. U3 E4 v

0 h& X* ~5 Z/ u5 T+ Pend do;
0 T! a5 R( c8 Q: q3 `#################################6 r5 b8 j" \) ?3 k
8 t1 Y, x. V% G
, M$ A; X; c" D

% f" R* J- Q4 i" ?8 }! z
% f+ h: S% g9 E: N& o$ Y0 r, i0 g
8 v5 u* p" ?, ?/ X$ L6 T# t7 ^+ b6 R- V( H

- p8 }9 [3 @4 J9 H+ O+ g  W2 d3 K: F