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)];
( `1 N7 {$ ~4 O! Y
7 d2 g( h: c7 WWL_Marix[i, j] := eq5[1]; print(WL_Marix);
* q! B- U  e+ Z- L' n" h0 \. D* G0 e" b' N: A3 n2 b  `" O- {
eq5 := assign['eq5'] 5 p; M" g, @4 D. X
$ O) l0 N4 `) E! ?' M
end do / ?' R3 y9 O+ g8 E! p9 x( y# o
8 P2 C/ t4 m$ j) |, Q6 I
end do;9 s( l1 u5 s, E. R
#################################0 l  h3 q: b% P

; i/ K$ M, G9 S1 q6 Z' b
1 |/ a0 m4 A! f5 f$ k% s) h
' n9 L( t9 r& U2 N% X% j) Q! o& U% |4 @' q. ]4 B

1 W! k! ~& l" M- p5 Q# H; m% ?, h
1 Y. d& _3 u$ C$ G+ C, K
  C- e2 v& e4 D3 O$ Z