- 在线时间
- 0 小时
- 最后登录
- 2020-3-27
- 注册时间
- 2020-3-27
- 听众数
- 1
- 收听数
- 0
- 能力
- 0 分
- 体力
- 2 点
- 威望
- 0 点
- 阅读权限
- 10
- 积分
- 1
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 2
- 主题
- 1
- 精华
- 0
- 分享
- 0
- 好友
- 0
升级   20% 该用户从未签到 - 自我介绍
- Maple初学者
 |
本帖最后由 No-one 于 2020-3-27 14:26 编辑
- f: F! t- b' j& V% Z0 L0 Y8 m7 W1 y. q
想通过Maple的for循环来把数据依次写入到一个零矩阵里,但结果是产生了一个table,矩阵里的0没有被替换,请问大佬们该如何修改。谢谢啦- d2 w/ F' g3 X+ |
#######################################' h, X: g3 n( z9 |
Qlist := [seq(i, i = 1 .. 2)];- t0 m. p* A- W$ Y" A
klist := [seq(.1*i, i = 1 .. 2)];/ r: [2 U# m' Y: `; z2 S
WL_Matrix := Matrix(nops(Qlist), nops(klist), 0);
7 l- u3 r/ r: e( C0 z; u F3 R7 sn := nops(Qlist);
# @% o( N8 p" m& i$ j% @+ M6 v% f% k3 H1 z- ]" w
for i to n do
; l6 n0 S; L( B8 g' b
% g' _% k1 l$ R for j to n do 3 f( \7 W. i2 l
: g4 B* O1 [- K: n4 @eq5 := [solve(subs([Q = Qlist, k = klist[j]], W^2*W0*k+Q^2) = 0, W)]; * f9 a. O5 f# @3 _6 f; ?
0 ?( w- k# b' S% p% Q( R3 S9 Y
WL_Marix[i, j] := eq5[1]; print(WL_Marix); ( N! R$ |' A/ y' v+ t
) Q2 l! J" S& |
eq5 := assign['eq5']
; \8 c# a Q( i5 Y: j8 Z: H+ u" W( }! B! U) R9 d/ ^8 v
end do
; Q* V! l K' P! L- `
- g8 S+ c& k& h# L! Pend do;' Q1 ~6 B) R# v0 |8 o G9 l
#################################
0 L1 r. B# m7 ^
5 B* s' d/ k u; j. J* m
6 _- R, `$ O$ j; {
0 v' q/ m3 `0 f+ k/ j0 J% ?8 {3 c( M
: M: i& I. Z+ D& t4 E
3 y0 A8 R( r; W0 O. d5 P8 E. E/ C) s* s9 R
Q& F0 G }% g! K4 X! d2 N; w+ g
/ e: o. n! D3 `# x) U
|
zan
|