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- p! [! c& u9 m
6 Q: g0 w/ X- N4 AWL_Marix[i, j] := eq5[1]; print(WL_Marix);
, t' U3 D$ H: b# V7 X5 Q7 {% P; c- \& q* ?: j* Q( o7 Z0 O. y
eq5 := assign['eq5'] 1 {3 ~* S7 D0 c" n2 Y% i: Q5 U* U

  t2 v% h0 }9 @$ `  d' D  W end do ( X' d* _; _* q/ z7 H0 r/ c

* z7 s0 Y$ T# r8 e5 _! q7 \end do;; J4 x6 J& ^' W2 S
#################################

9 a% w5 y8 @* ~, @+ z+ P7 i$ ~
7 l0 c$ P+ B1 o; h% }; T: D, ^" i. ]
. Z. o7 n& [3 h& t+ D6 E3 Q+ `% }

! J9 w0 S7 z, ^; v. e% |9 P
( J3 Z& h# O8 ^  X- O5 H0 a7 ^& c. M/ l
' G. Z/ O3 K' E  E5 E3 n" X