陈了 发表于 2010-3-19 09:29

怎么用Mathematica 5做这道题

幻灯片 1对(x+y-z)^5进行多项式展开,并且提取其中包含xmzn的项(m是任意奇数,n是任意偶数)
谢谢哦

aqua2001 发表于 2010-3-19 15:58

展开多项式的函数是Expand[],但是不知道该如何能自动把需要的项提出来,你可以手工弄出来!

chuchumaolu 发表于 2010-3-20 10:41

版主也这样垃圾呀,我不知道怎么在mathematica 中实现匹配,

我想问问你做这个又什么目的吗,

chuchumaolu 发表于 2010-3-20 12:01

第一步:Expand;
第二步:Cases;
(*pattern:见网址:http://reference.wolfram.com/mathematica/guide/Patterns.html*)
我还没有查到,你先自己找找吧
写出来了,告诉我哦

陈了 发表于 2010-3-22 11:14

还是不懂呀~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

chuchumaolu 发表于 2010-3-25 08:38

昨天晚上做到这这一步了;
exp = Expand[(x + y - z)^5];
Cases
结果为:{-5 x^4 z, 10 x^3 z^2, -10 x^2 z^3, 5 x z^4}
但是对于:对于x,z的幂不知道怎么筛选

chuchumaolu 发表于 2010-3-27 12:51

写了一个垃圾程序做出来了,但是表达式怎么写实在不知道:
exp = Expand[(x + y - z)^5];
f = {m, n};
out = {};
Module[{i, list, len},
len = Length;
For[i = 1, i <= len, i++,
  If], l_Integer*x^m_.*z^n_.], list = f]];
   If]] && EvenQ]],
    out = Append]]
    ]
   ]
  ]
]
out =
{10 x^3 z^2, 5 x z^4}

月下侏儒 发表于 2012-7-23 09:45

{:3_41:}。。。。。。。。。。。。。。
页: [1]
查看完整版本: 怎么用Mathematica 5做这道题