24小时热门版块排行榜    

CyRhmU.jpeg
查看: 507  |  回复: 3

chj787

金虫 (小有名气)

[求助] 求用 Mathematica 表示下面的表达式已有3人参与

http://image.keyan.cc/data/bcs/2 ... _1426423862_834.png

求助高手,在 Mathematica中怎么书写这个表达式?并且能够书写后能够展开为多项式。希望提供个在 Mathematica的.nb文件。非常感谢帮助!

求用 Mathematica 表示下面的表达式
`FOKZZRJ831X(0J`{KQH684.png
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangxiyu199

金虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
这样的表达式想求解是没有问题的,但是不可能用这种格式书写。上下标在Mathematica中是没有区别意义的!

[ 发自小木虫客户端 ]
2楼2015-03-15 22:56:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xzczd

木虫 (小有名气)

【答案】应助回帖

感谢参与,应助指数 +1
以下写法的效率不是最高的,但是楼主的式子好像对效率的要求不高,而且看样子楼主是初学,那么这个应该比较容易理解:
CODE:
Sum[If[i + j <= 6, 1, 0] Subscript[c, i, j] a^i b^j, {i, 6}, {j, 6}]

顺便,在Mathematica里最好尽量避免下标,因为在进一步的编程里可能会有麻烦。建议用这种写法:
CODE:
Sum[If[i + j <= 6, 1, 0] c[i, j] a^i b^j, {i, 6}, {j, 6}]

小木虫Mathematica版块已毁(当然原本也不咋的),建议大家前往百度贴吧或Stackexchange。
3楼2015-03-16 13:58:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wufengseu

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
chj787: 金币+40, ★★★★★最佳答案 2015-03-18 17:43:38
给个效率高的代码及其源文件。
求用 Mathematica 表示下面的表达式-1
Snap1.jpg

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : sum.nb
  • 2015-03-18 15:06:07, 3.68 K
4楼2015-03-18 15:06:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 chj787 的主题更新
信息提示
请填处理意见