数学建模社区-数学中国
标题:
怎么用Mathematica 5做这道题
[打印本页]
作者:
陈了
时间:
2010-3-19 09:29
标题:
怎么用Mathematica 5做这道题
幻灯片 1
对
(x+y-z)^5
进行多项式展开，并且提取其中包含
x
m
z
n
的项
(m
是任意奇数
,n
是任意偶数
)
- T1 l: \9 w! j; r4 q2 x+ X
谢谢哦
8 m' S; l' g1 c) U. Q
作者:
aqua2001
时间:
2010-3-19 15:58
展开多项式的函数是Expand[],但是不知道该如何能自动把需要的项提出来，你可以手工弄出来！
作者:
chuchumaolu
时间:
2010-3-20 10:41
版主也这样垃圾呀，我不知道怎么在mathematica 中实现匹配，
5 c1 k9 ]# b# {; Y, v7 R: s0 [$ H: N
* L# t% `* R9 w: c8 h( u1 ^$ v
我想问问你做这个又什么目的吗，
作者:
chuchumaolu
时间:
2010-3-20 12:01
第一步：Expand[expr];
, q! M0 X4 e/ A( n4 C
第二步：Cases[list,patterns];
0 I1 U, ^; B, \( @" c& p
(*pattern:见网址：
http://reference.wolfram.com/mathematica/guide/Patterns.html
*)
1 i7 ^% {! \6 [% t: d- v w. D
我还没有查到，你先自己找找吧
* A3 C0 Y, R) w
写出来了，告诉我哦
作者:
陈了
时间:
2010-3-22 11:14
还是不懂呀~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
作者:
chuchumaolu
时间:
2010-3-25 08:38
昨天晚上做到这这一步了;
) }0 ?7 J9 f$ r' w5 L9 v
exp = Expand[(x + y - z)^5];
( {$ ~; v2 @, w5 m) Y
Cases[exp, l_Integer x^m_. z^n_.]
4 Q* `3 D/ h- \' V
结果为：{-5 x^4 z, 10 x^3 z^2, -10 x^2 z^3, 5 x z^4}
- z+ T5 H: N7 A, ^6 ^3 `& [
但是对于：对于x,z的幂不知道怎么筛选
作者:
chuchumaolu
时间:
2010-3-27 12:51
写了一个垃圾程序做出来了，但是表达式怎么写实在不知道：
- x# [1 }& z w
exp = Expand[(x + y - z)^5];
, O6 Q8 \! t0 Z) u" h! ^- K
f[l_Integer*x^m_.*z^n_.] = {m, n};
$ ^4 M. x* @: \% D2 w' t
out = {};
$ W! w$ c8 Y% }
Module[{i, list, len},
" B6 F! v0 i! e7 K4 h \- U
len = Length[exp];
1 S! |7 X& b$ l
For[i = 1, i <= len, i++,
* J7 ?5 [' V) o6 n
If[MatchQ[exp[[i]], l_Integer*x^m_.*z^n_.], list = f[exp[[i]]];
, M1 a' r* w+ `3 v i
If[OddQ[list[[1]]] && EvenQ[list[[2]]],
0 K2 H! o" ~: }' V
out = Append[out, exp[[i]]]
0 z( I) h, |3 A% g
]
7 Y3 z* Y8 c1 V ]2 t
]
- R+ g+ ~, {! L# p5 R; H% x( `9 ^
]
0 z+ r$ X' n7 E: ^% u
]
6 ^* |. P! t( v5 c/ Y% w1 B1 t
out =
# z Y3 z9 ~3 L# S+ D" p: f- T
{10 x^3 z^2, 5 x z^4}
作者:
月下侏儒
时间:
2012-7-23 09:45
。。。。。。。。。。。。。。
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5
。。。。。。。。。。。。。。