24小时热门版块排行榜    

查看: 2099  |  回复: 9
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

xhw2211

金虫 (正式写手)

[求助] 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]}]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xhw2211

金虫 (正式写手)


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]}]
9楼2011-07-26 09:33:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 10 个回答

jjdg

版主 (知名作家)

优秀版主

你是用z,t作图的吧?
但你的z值是从哪里来?
努力学习!以正当途径!获得需要的知识!
2楼2011-07-25 17:51:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xhw2211

金虫 (正式写手)

最后一句应该是lot[m, {t, 0, 1}, PlotStyle -> {Red, Thickness[0.008]}]
3楼2011-07-25 18:33:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xhw2211

金虫 (正式写手)

晕,居然出现一个笑脸。最后一句话z应该是m,我写错了。
4楼2011-07-25 18:35:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 0XLacIJUOj8D 2026-08-24 3/150 2026-08-25 01:47 by BZKMTicpDhFj
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 0XLacIJUOj8D 2026-08-24 6/300 2026-08-25 00:11 by BZKMTicpDhFj
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +7 scalable 2026-08-24 7/350 2026-08-24 23:01 by anata1209
[基金申请] 人气不行了 +10 fansofjerry 2026-08-21 10/500 2026-08-24 21:03 by zhanghaozhu
[基金申请] 我面上完蛋了 +9 且听虎啸 2026-08-20 10/500 2026-08-24 20:08 by 苦寒来香
[基金申请] filecode,4个jtjc了 +14 ziyangfang 2026-08-19 17/850 2026-08-24 18:37 by 哈哈蛤?
[基金申请] 建议基金发布提前给出明确的时间点 +13 kulium 2026-08-21 16/800 2026-08-24 16:27 by superceng
[基金申请] 今日不放榜?网传国自然预计 8 月 27 日可查结果 +17 医学老男孩 2026-08-20 21/1050 2026-08-24 14:21 by refreshing11
[基金申请] 估计是周四 +4 archvillain 2026-08-18 4/200 2026-08-24 13:53 by zzuzxg
[基金申请] 让我中一个面上吧! +13 大萍1987 2026-08-20 16/800 2026-08-24 10:23 by 太傻了
[基金申请] 什么时候开奖? +10 CrisMessi 2026-08-18 11/550 2026-08-24 06:50 by 开心的小狮子
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +4 process2012 2026-08-23 5/250 2026-08-23 19:58 by jurkat.1640
[基金申请] 今天基金会出结果吗?20260819 +16 kkkl_v 2026-08-19 17/850 2026-08-22 16:12 by 阿布Abu
[基金申请] 时间戳今天,20号变了 +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[基金申请] 看来今天不会放榜了? +8 chengyan1220 2026-08-21 11/550 2026-08-21 17:52 by dcqxinyang
[基金申请] 应该是下周三26日公布了吧? +4 哈哈蛤? 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[基金申请] 今天放榜没戏了吧 +9 yuleib84 2026-08-19 11/550 2026-08-21 10:06 by gltch
[基金申请] 重要消息,中午系统在维护 +11 yuleib84 2026-08-18 12/600 2026-08-20 11:09 by xskun
[基金申请] 明天放榜? +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -大大大大大-
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
信息提示
请填处理意见