永发信息网

如何用Mathematica实现下面的问题

答案:1  悬赏:40  手机版
解决时间 2021-07-19 09:00
如何用Mathematica实现下面的问题
1、ff={{(-555.443 + 3.55271*10^-14 \[ImaginaryI]) (-2 + c)^2 (-1 +
c) + (993.607\[VeryThinSpace]-
5.68434*10^-14 \[ImaginaryI]) (-3 + c) (-1 +
c)^2 + ((-950.138 - 4.26326*10^-14 \[ImaginaryI]) (-3 + c) (-2 +
c) + (822.843\[VeryThinSpace]-
7.66054*10^-14 \[ImaginaryI]) (-4 + c) (-1 +
c)) c + (1122.4\[VeryThinSpace]+
2.84884*10^-14 \[ImaginaryI]) (-5 + c) c^2},{(-211.125 -
1.59872*10^-14 \[ImaginaryI]) (-2 + c)^2 (-1 +
c) + (377.672\[VeryThinSpace]+
2.84217*10^-14 \[ImaginaryI]) (-3 + c) (-1 +
c)^2 + ((1531.32\[VeryThinSpace]-
1.42109*10^-14 \[ImaginaryI]) (-3 + c) (-2 +
c) - (1326.16\[VeryThinSpace]-
4.17444*10^-14 \[ImaginaryI]) (-4 + c) (-1 +
c)) c + (426.625\[VeryThinSpace]-
1.02298*10^-14 \[ImaginaryI]) (-5 +
c) c^2},{(172.696\[VeryThinSpace]+
6.39488*10^-14 \[ImaginaryI]) (-2 + c)^2 (-1 +
c) - (308.929\[VeryThinSpace]+ 0.\[ImaginaryI]) (-3 + c) (-1 +
c)^2 + ((264.405\[VeryThinSpace]+
6.39488*10^-14 \[ImaginaryI]) (-3 + c) (-2 +
c) - (228.981\[VeryThinSpace]+
4.26326*10^-14 \[ImaginaryI]) (-4 + c) (-1 +
c)) c - (348.972\[VeryThinSpace]-
8.58841*10^-15 \[ImaginaryI]) (-5 + c) c^2},{(-172.696 +
3.90799*10^-14 \[ImaginaryI]) (-2 + c)^2 (-1 +
c) + (308.929\[VeryThinSpace]-
1.42109*10^-14 \[ImaginaryI]) (-3 + c) (-1 +
c)^2 + ((264.405\[VeryThinSpace]-
1.42109*10^-14 \[ImaginaryI]) (-3 + c) (-2 +
c) - (228.981\[VeryThinSpace]+
1.06581*10^-14 \[ImaginaryI]) (-4 + c) (-1 +
c)) c + (348.972\[VeryThinSpace]+
1.43058*10^-15 \[ImaginaryI]) (-5 +
c) c^2}}
把ff中类似于(-2 + c)^2 ,(-1 + c)^2,c^2.项去掉;(就是去掉关于c的次幂大于等于2的项)
2,对 ff 进行了1 中的运算后,在对其进行Normalize
比如 ff 第一项进行1的运算后变为
{ (-950.138 - 4.26326*10^-14 \[ImaginaryI]) (-3 + c) (-2 + c)c + (822.843\[VeryThinSpace]- 7.66054*10^-14 \[ImaginaryI]) (-4 + c) (-1 + c) c}
然后对其系数进行Normalize:

{-0.755929 - 3.39184*10^-17 \[ImaginaryI](-3 + c) (-2 + c)c,
0.654654\[VeryThinSpace]- 6.09472*10^-17 \[ImaginaryI](-4 + c) (-1 + c) c}
最佳答案

之前你都问了这么多模式匹配的问题了,居然还弄不清这种项要怎么去掉吗……:
ff /. a__ b_^c_ d_ -> 0
今天天色已晚,第二问随便写一个……虽然你一直不说你是想要达到什么目的,但是,我发现你的数字虚部很小,那么,你是不是其实想把过小的数舍掉呢?:
ff1 = ff /. a__ b_^c_ d_ -> 0
Expand[#, a_ b__] & /@ Chop[ff1/Sqrt[(ff1 /. a_Complex b__ -> a^2)/c]]
再问: 第一个我改成 ff/. a__ ^c_ -> 0,不然如果换个表达式包含(-2 + c)^3 这样的项则无法删除..... 第二个.......没看懂.....也没运行出来......
再答: 因为昨天是随手写的,所以针对性要强了一些,没有仔细考虑。你的第一个的改法是正确的。 怎么,你的表达式还有别的特征还是怎么的?第二个要把你上面的示例给解决掉是毫无问题的。 你是哪里看不懂呢?Chop翻翻帮助就该明白了吧?你总不会是不认识纯函数吧?总之多看帮助。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
穿什么样的衣服适合我
救命 啊啊!!!
dnf深渊刷出来不可以交易的装备叫什么装备?
天下貳 浮劲 特效
梦自己出嫁
玩梦幻西游,到底要砸多少钱呀?
该怎样面对欺骗自己的朋友?
公式编辑器怎么装
才一成语.
问!。宿舍里碰到全身恶臭的室友(脚臭,腋臭
麦迪和科比谁魅力更大
女孩喜欢男孩有啥表现呀
高一信息练习部分答案
QQ空间风格可以自定拟吗?
在C#中怎么用代码编辑toolstripSeparator里面
推荐资讯
赛尔号高手请进
请问when在这句话中引导的是什么从句?
房屋合同纠纷
梦幻西游股票吞钱?
已知一次函数y=KX+b的自变量x的取值范围...
高沸点酸是怎样治低沸点酸
C51单片机编程
为什么我把首页设定为百度后,再打开浏览器,
饭后吃萍是果好还是饭前吃好?
哈尔滨金太阳真的有靓妃化妆品吗?我今天去了
最新出的Q版游戏不收费的是哪个游戏?
window 7系统下怎么刻录系统光盘?哪个刻录软
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?