QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 8680|回复: 0
打印 上一主题 下一主题

Maple的for循环求助

[复制链接]
字体大小: 正常 放大
No-one        

1

主题

1

听众

1

积分

升级  20%

该用户从未签到

自我介绍
Maple初学者
跳转到指定楼层
1#
发表于 2020-3-27 14:25 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
本帖最后由 No-one 于 2020-3-27 14:26 编辑 ! t8 B9 q8 ]6 k5 h+ r* ^3 A
/ \3 R7 ~+ v0 H' t# W4 O$ U3 M1 n& l
想通过Maple的for循环来把数据依次写入到一个零矩阵里,但结果是产生了一个table,矩阵里的0没有被替换,请问大佬们该如何修改。谢谢啦1 E+ R5 E- f) d' d, F
#######################################4 j. _% L. n/ v' ?, ?
Qlist := [seq(i, i = 1 .. 2)];
' G& a+ I# f. Tklist := [seq(.1*i, i = 1 .. 2)];* H% o( Y0 _* e& \: K2 K
WL_Matrix := Matrix(nops(Qlist), nops(klist), 0);
% U; @: |3 Y4 p( r9 vn := nops(Qlist);
! q* U1 V0 {7 S6 _; }3 }" l9 z9 ]6 w" Z$ I! C
for i to n do
4 ?4 O9 i; o3 \) H, S. v$ e, s. r  [2 F; t. F
for j to n do
* a" G, e4 P. d' i4 {: ]$ A# ]1 }. R) g, W) O
eq5 := [solve(subs([Q = Qlist, k = klist[j]], W^2*W0*k+Q^2) = 0, W)];
" y. }( k  M: G: x  ^& X
) p5 M# @, Y4 T2 z& l8 u5 d: DWL_Marix[i, j] := eq5[1]; print(WL_Marix);
4 N/ @) m5 U1 H% x6 l9 E' @7 D, N
6 S2 b# `9 I% X8 o0 ^( s- |eq5 := assign['eq5']
% W9 F! f; K! w% I: m
. u% X1 B; H! K end do
7 }. D  a0 F: @5 M/ H/ c7 w9 q+ ]
( l9 t, k; I# p- X4 |. tend do;
5 O! }: [  C: P  P3 x/ v#################################9 p/ N) C1 `5 M  F- u, t) j% H

4 P/ c  L; }8 ]# E' a
' M5 m+ k2 `, I8 y7 k6 B1 U2 w3 ?# g

# V+ Z, g% \+ T
! T& |( o# m0 c# G4 l  \" ^. H
! @. Z" d7 t+ Q; i
/ t# [# T' b) m. b4 G! O2 S2 b

6 z  }' e9 B' M" U: r5 h

Capture1.PNG (9.48 KB, 下载次数: 459)

Maple18运行结果

Maple18运行结果

zan
转播转播0 分享淘帖0 分享分享0 收藏收藏1 支持支持0 反对反对0 微信微信
您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-8-6 19:58 , Processed in 0.417735 second(s), 58 queries .

回顶部