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)];
) @3 s8 D! o$ r" B* @3 M6 \( s! K/ q; E% _+ l+ M) j" k
WL_Marix[i, j] := eq5[1]; print(WL_Marix);
% J- d& i9 l8 R8 a" y3 ^
  U2 w, u0 n! I9 C! heq5 := assign['eq5'] 8 r2 f( V& u6 _

" U' T/ ~" X; z" Z" J  q" ^ end do
7 s/ `* k+ i4 I- X. e/ A$ K# N8 b# R- Q# J+ T' \
end do;9 a7 d# d$ t4 P
#################################
% r) Z+ t& q' ^( m: `2 ?! U: |5 p4 ~% H3 i: ~: P

+ n0 L$ `' A0 I4 j; a, B& c
  G$ g$ P, T8 r. B4 b0 Y
6 F" r8 I3 V* o7 I  W! X5 G- T" v7 ?

' d- D; R9 r, U+ f' u4 z
$ `4 _  v0 e. t2 C  M# m  m2 J) {0 o' c8 D4 D