24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

xhw2211

金虫 (正式写手)

应助: 0 (幼儿园)
金币: 9240.1
红花: 1
帖子: 301
在线: 56.3小时
虫号: 570836
注册: 2008-06-08
专业: 机械结构强度学

[求助] mathematica 编程求助

头一次用mathtematica编的程序，总是没有画出图形，不知道错在什么地方了，大牛看一下。

z1 = LaplaceTransform[Exp[-10*t - 5*t^2], t, s];
z2 = LaplaceTransform[(10 + 10*t)*Exp[-10*t - 5*t^2], t, s];
z3 = Simplify[z2];
equ1 = z1 + z3*y - z;
y1 = LaplaceTransform[7*Exp[-7*t], t, s];
y2 = LaplaceTransform[110*Exp[-110*t], t, s];
equ2 = y1*x + y2*z - y;
x1 = LaplaceTransform[120*Exp[-120*t], t, s];
equ3 = x1*y - x;
Solve[{equ1 == 0, equ2 == 0, equ3 == 0}, {x, y, z}]
m = InverseLaplaceTransform[z, s, t]
Plot[z, {t, 0, 1}, PlotStyle -> {Red, Thickness[0.008]}]

回复此楼

» 猜你喜欢

求个博导看看已经有17人回复
青基代表作，AAAI之类的A会的special track在国内认可度高吗？还是归为workshop之流？已经有3人回复
上海工程技术大学【激光智能制造】课题组招收硕士已经有6人回复
带资进组求博导收留已经有11人回复
自荐读博已经有5人回复
上海工程技术大学张培磊教授团队招收博士生已经有4人回复
求助院士们，这个如何合成呀已经有4人回复
临港实验室与上科大联培博士招生1名已经有9人回复
写了一篇“相变储能技术在冷库中应用”的论文，论文内容以实验为主，投什么期刊合适？已经有6人回复
最近几年招的学生写论文不引自己组发的文章已经有11人回复

» 本主题相关价值贴推荐，对您同样有帮助:

1楼 2011-07-25 13:38:57

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

xhw2211

金虫 (正式写手)

应助: 0 (幼儿园)
金币: 9240.1
红花: 1
帖子: 301
在线: 56.3小时
虫号: 570836
注册: 2008-06-08
专业: 机械结构强度学

★
jjdg(金币+1): 感谢参与 2011-07-30 14:50:08

下面这个是对的：
z1 = LaplaceTransform[Exp[-10*t - 5*t^2], t, s];
z2 = LaplaceTransform[(10 + 10*t)*Exp[-10*t - 5*t^2], t, s];
z3 = Simplify[z2];
equ1 = z1 + z3*y - z;
y1 = LaplaceTransform[7*Exp[-7*t], t, s];
y2 = LaplaceTransform[110*Exp[-110*t], t, s];
equ2 = y1*x + y2*z - y;
x1 = LaplaceTransform[120*Exp[-120*t], t, s];
equ3 = x1*y - x;
rr = Solve[{equ1 == 0, equ2 == 0, equ3 == 0}, {x, y, z}];
z = z /. rr;
m = InverseLaplaceTransform[z, s, t]
Plot[m, {t, 0, 1}, PlotStyle -> {Red, Thickness[0.008]}]