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)];
: I$ \6 L) E$ x" v% y; w' e
1 t0 ~8 h* q2 L7 S. u$ f: K. dWL_Marix[i, j] := eq5[1]; print(WL_Marix); 6 t- h) R$ P" f  D
( W3 e; s! V. K& O- H
eq5 := assign['eq5']
- ?5 S3 \  S1 a0 K: \7 `
3 }, G4 l3 O7 a! y9 G& n end do 2 V- P# e$ }6 S3 R/ h1 `- \

6 C8 |$ L$ \! f+ lend do;  ?6 x$ {4 b4 K: G
################################## H) ?7 z; C" T4 z8 P
: l9 k/ Q: J; z+ T

' k' p! O! F8 m4 x" |0 S' c7 v5 e7 ]5 g7 n' h' S

! @& f0 c: t# C. l1 T& e9 b
; G# A/ w& q. Q8 r+ T' _9 T
+ k- E3 o  n& {
/ E+ I4 M, V( n
+ H% {/ E' q  P4 {3 h