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)]; / b9 G9 f7 K5 }' r) I! O

' o4 Z$ Y% {, h/ A) j9 zWL_Marix[i, j] := eq5[1]; print(WL_Marix);
- D+ `0 b$ ?4 r) O" m
, v4 t+ F$ T  _) t7 ?8 M6 ]. Heq5 := assign['eq5']
0 j3 @3 O/ y" f8 E4 D
: L6 M0 ~2 A8 k end do 0 X0 s( L5 X8 A

5 \/ ~2 S  H8 xend do;
+ t3 U  T' G, `) [* B# D#################################0 h$ n5 r: h: t9 j8 t$ U& X
0 Z, [  f& m) p+ D, c

6 a. w& d; H1 {0 y+ Q# p" b# I: G* X% ^+ z8 h! Q% s4 t  m

, \& C! ?( n( A+ V* ?9 ]& H' i* F4 W* t; \% ?; k
( i3 K; ?$ a3 D! t' q3 e% J9 a
4 h& M" y8 W0 g' x7 g( f

; T6 K" u5 v, W: @8 Z( G) |