应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 一个公式，对比两边不同项的系数，然后另他们相等，求各个系数，怎么列公式，谢谢
101/1返回列表
查看: 2132  |  回复: 9
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

wocamuchong

铁虫 (小有名气)

[求助] 一个公式，对比两边不同项的系数，然后另他们相等，求各个系数，怎么列公式，谢谢 已有1人参与

具体问题是我现在得到一个公式，左边是
a[0] + y a[1] + y^2 a[2] + y^3 a[3] + y^4 a[4]
右边是
b[0] + y b[1] + y^2 b[2] + y^3 b[3] + y^4 b[4] + y^5 b[5] + y^6 b[6]
下一步是令两边的同次项的系数相等，所以 b[5] 和 b[6] 是零了，但是怎么自动的让其他项相等，注：b[ i ] 是 a[ i ] 的方程，最后的结果是求a[ i ]。我后面可能会用很多项，比如20项，不可能手动的一个个写。有什么好方法吗？谢谢

[ Last edited by wocamuchong on 2014-2-5 at 06:54 ]
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2014-02-05 06:46:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

userhung

禁虫 (文学泰斗)

木虫博士

【答案】应助回帖

★
感谢参与，应助指数 +1
xzhdty: 金币+1, 谢谢参与 2014-02-05 08:56:58
a[ i ] = b[ i ]

其中 i = y的次方数
赞一下 回复此楼
2楼2014-02-05 08:25:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

walk1997

金虫 (著名写手)
t1 = a[0] + y a[1] + y^2 a[2] + y^3 a[3] + y^4 a[4]
t2 = b[0] + y b[1] + y^2 b[2] + y^3 b[3] + y^4 b[4] + y^5 b[5] +
  y^6 b[6]
t3 = PadRight[t3, Max[Length[t3], Length[t4]]]
t4 = PadRight[t4, Max[Length[t3], Length[t4]]]
eqs = {t3 == t4}
赞一下 回复此楼
3楼2014-02-05 10:32:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

walk1997

金虫 (著名写手)
引用回帖:
3楼: Originally posted by walk1997 at 2014-02-05 10:32:46
t1 = a + y a + y^2 a + y^3 a + y^4 a
t2 = b + y b + y^2 b + y^3 b + y^4 b + y^5 b +
  y^6 b
t3 = PadRight[t3, Max]
t4 = PadRight[t4, Max]
eqs = {t3 == t4}...

丢了2行

t1 = a[0] + y a[1] + y^2 a[2] + y^3 a[3] + y^4 a[4]
t2 = b[0] + y b[1] + y^2 b[2] + y^3 b[3] + y^4 b[4] + y^5 b[5] +
  y^6 b[6]
t3 = CoefficientList[t1, y]
t4 = CoefficientList[t2, y]
t3 = PadRight[t3, Max[Length[t3], Length[t4]]]
t4 = PadRight[t4, Max[Length[t3], Length[t4]]]
eqs = {t3 == t4}
赞一下 回复此楼
4楼2014-02-05 10:34:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wocamuchong

铁虫 (小有名气)
引用回帖:
4楼: Originally posted by walk1997 at 2014-02-05 10:34:11
丢了2行

t1 = a + y a + y^2 a + y^3 a + y^4 a
t2 = b + y b + y^2 b + y^3 b + y^4 b + y^5 b +
  y^6 b
t3 = CoefficientList
t4 = CoefficientList
t3 = PadRight[t3, Max]
t4 = PadRight[t4, Max]
...

谢谢！！还有个问题，我不太懂Solve出来的箭头表示什么意思
我定义atable
atable = Table[a, {i, 0, n}];
我Solve这个equation，以atable为自变量
Sol = Solve[eqs, atable]
得到的是a[0]->DD, a[1] -> B + 50. DD^2,  a[2] -> A + 50. B DD + 2500. DD^3.......等等，这里的B，DD不重要，我是想a[ i ]就变成这些值，我应该怎么做？
我试了，atable /. Sol，但是好像不管用。我附上我的文件，请看一下。谢谢。
赞一下 回复此楼
5楼2014-02-05 21:05:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wocamuchong

铁虫 (小有名气)
内容已删除
回复此楼
6楼2014-02-05 21:16:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

walk1997

金虫 (著名写手)
引用回帖:
5楼: Originally posted by wocamuchong at 2014-02-05 21:05:58
谢谢！！还有个问题，我不太懂Solve出来的箭头表示什么意思
我定义atable
atable = Table;
我Solve这个equation，以atable为自变量
Sol = Solve
得到的是a->DD, a -> B + 50. DD^2,  a -> A + 50. B ...

是这么用的 不会不管用的
例子  取第一组解
Clear["Global`*"];
atable = Table[a[j], {j, 0, 1}]
sol = Solve[{a[0] + a[1] == 1, a[0] - a[1] == 2}, atable][[1]]
Table[a[j] = a[j] /. sol, {j, 0, 1}]
atable
赞一下(1人) 回复此楼
7楼2014-02-05 21:58:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wocamuchong

铁虫 (小有名气)
引用回帖:
7楼: Originally posted by walk1997 at 2014-02-05 21:58:59
是这么用的 不会不管用的
例子  取第一组解
Clear;
atable = Table
sol = Solve[]
Table
atable...

十分谢谢，你太厉害了。。。。以后用mathematica不懂都问你了。
赞一下 回复此楼
8楼2014-02-05 22:11:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wocamuchong

铁虫 (小有名气)
要分吗？你回复个应助之类的。谢谢
赞一下 回复此楼
9楼2014-02-05 22:11:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

walk1997

金虫 (著名写手)
引用回帖:
9楼: Originally posted by wocamuchong at 2014-02-05 22:11:52
要分吗？你回复个应助之类的。谢谢

不用分  
客气  我也只是初入门(也许连入门也还谈不上)  真实感触
共同提高吧
赞一下(1人) 回复此楼
10楼2014-02-05 22:17:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wocamuchong 的主题更新
101/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +4 QTy3jDtz1uLt 2026-08-21 10/500 2026-08-22 23:42 by OEbVnUOu01ol
[基金申请] 2026国自然函评费到账 +11 羊腰板 2026-08-21 11/550 2026-08-22 22:03 by lsbin3733
[基金申请] 范进中举一文的中心思想 +3 zjuhero 2026-08-22 4/200 2026-08-22 20:02 by mycsru
[基金申请] filecode，4个jtjc了 +13 ziyangfang 2026-08-19 16/800 2026-08-22 17:08 by WH3796
[教师之家] 售一区SCI文章T0P，我:8O.551.O54,科目全,可十急 +4 2JOx3r2CYEgw 2026-08-21 4/200 2026-08-22 16:52 by sunzitan
[基金申请] 人气不行了 +8 fansofjerry 2026-08-21 8/400 2026-08-22 16:30 by zyqchem
[基金申请] 时间戳今天，20号变了 +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[基金申请] 放榜前的不淡定 40+4 snowwithsea 2026-08-19 14/700 2026-08-21 23:51 by cratir
[基金申请] 建议基金发布提前给出明确的时间点 +10 kulium 2026-08-21 13/650 2026-08-21 21:58 by alongwaytogo
[基金申请] 今日不放榜？网传国自然预计 8 月 27 日可查结果 +16 医学老男孩 2026-08-20 20/1000 2026-08-21 21:13 by Ldrop2023
[基金申请] 科研孤儿太难了 +17 我4大白菜 2026-08-20 18/900 2026-08-21 20:57 by zhangev
[基金申请] 让我中一个面上吧！ +11 大萍1987 2026-08-20 13/650 2026-08-21 14:48 by 20120902066
[基金申请] 应该是下周三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
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[基金申请] 今天系统多次维护，明天很可能放榜！ +10 zju2000 2026-08-16 11/550 2026-08-20 20:02 by cl479861084
[基金申请] 今天放榜吗？ +14 布布和一二 2026-08-19 15/750 2026-08-19 18:07 by gltch
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 明天放榜？ +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 家与远方
信息提示
关闭
请填处理意见
关闭