| 查看: 1206 | 回复: 7 | ||||
| 【悬赏金币】回答本帖问题，作者华丽的飘过将赠送您 10 个金币 | ||||
华丽的飘过新虫
|
[求助]
如何用Mathematica处理不可对易乘法
|
|||
|
小虫要计算一些不可对易关系的乘法，A1*A2=-A2*A1，也就是A1和A2不符合乘法交换律，但是比如AAA=（C1*A1）*（C2*A2）=C1*C2*（A1*A2）=C2*C1*（A1*A2）也就是说C1和C2是符合乘法交换律的，在Mathematica中能否有什么命令可以使这个计算实现，并提出A1*A2项的系数C1*C2呢？ 其实我是想做一个外乘的事情，但是我发现Mathematica中的Wedge命令根本没法用来计算，不知哪位大侠能帮我想想该怎么实现，比如AAA=（C1*A1）*（C2*A2）=C1*C2*（A1*A2）中提出A1*A2项的系数C1*C2，最好还能自动合并A1*A2和A2*A1项（因为有A1*A2=-A2*A1关系）的程序或者命令？ |
回复此楼» 收录本帖的淘帖专辑推荐
 科研经验 |
» 猜你喜欢
309分085801求调剂
已经有7人回复
-
生物学308分求调剂（一志愿华东师大）
已经有3人回复
-
求调剂：一志愿：南京大学 专业：0705 总分320 ，本科985，四六级已过
已经有3人回复
-
环境工程 085701，267求调剂
已经有14人回复
-
308求调剂
已经有12人回复
-
求调剂：085600材料与化工，考材科基，总分319
已经有21人回复
-
311求调剂
已经有8人回复
-
294分080500材料科学与工程求调剂
已经有13人回复
-
288求调剂 一志愿哈工大 材料与化工
已经有19人回复
-
288资源与环境专硕求调剂，不限专业，有学上就行
已经有23人回复
virtualzx
主管区长
- 应助: 263 (大学生)
- 金币: 7161.3
- 红花: 54
- 帖子: 1605
- 在线: 317.6小时
- 虫号: 2069080
- 注册: 2012-10-18
- 性别: GG
- 专业: 理论和计算化学
2楼2012-11-09 03:05:18
华丽的飘过
无虫
- 应助: 41 (小学生)
- 贵宾: 0.116
- 金币: 7633.4
- 散金: 8
- 红花: 48
- 沙发: 1
- 帖子: 1264
- 在线: 892.6小时
- 虫号: 1404465
- 注册: 2011-09-16
- 性别: GG
- 专业: 高等教育学
- 管辖: 物理
3楼2012-11-09 11:21:02
walk1997
兑换贵宾
- 应助: 1 (幼儿园)
- 金币: 4676.2
- 红花: 22
- 帖子: 1066
- 在线: 798.1小时
- 虫号: 416039
- 注册: 2007-06-29
- 性别: GG
- 专业: 粒子物理学和场论
★
jjdg: 金币+1, 辛苦了 2012-11-10 01:07:32
jjdg: 金币+1, 辛苦了 2012-11-10 01:07:32
|
如果只是上面这样简单或者特殊的情况，应该可以直接自己定义规则，一个例子 －-------------------------------------- rule1 = {(x_*b) ** (y_*d) -> x*y*(b ** d), (x_*d) ** (y_*b) -> x*y*(d ** b)}; rule2 = {b ** d -> -d ** b}; t1 = (a*b) ** (c*d) + (x*d) ** (y*b) t1 = t1 /. rule1 /. rule2 Coefficient[t1, d ** b] －--------------------------------------- 如果很复杂的话，可以用nc软件包 https://www.math.ucsd.edu/~ncalg/ << NC`; << NCAlgebra`; t1 = (AA1 ** b) ** (AA2 ** d) + (AA3 ** d) ** (AA4 ** b) t1 = Substitute[t1, b ** d -> -d ** b] NCCollect[t1, d ** b] |
4楼2012-11-09 23:56:42
华丽的飘过
无虫
- 应助: 41 (小学生)
- 贵宾: 0.116
- 金币: 7633.4
- 散金: 8
- 红花: 48
- 沙发: 1
- 帖子: 1264
- 在线: 892.6小时
- 虫号: 1404465
- 注册: 2011-09-16
- 性别: GG
- 专业: 高等教育学
- 管辖: 物理
5楼2012-11-10 00:10:19
华丽的飘过
新虫
- 应助: 41 (小学生)
- 贵宾: 0.116
- 金币: 7633.4
- 散金: 8
- 红花: 48
- 沙发: 1
- 帖子: 1264
- 在线: 892.6小时
- 虫号: 1404465
- 注册: 2011-09-16
- 性别: GG
- 专业: 高等教育学
- 管辖: 物理
6楼2013-02-25 03:37:58
walk1997
主管区长
- 应助: 1 (幼儿园)
- 金币: 4676.2
- 红花: 22
- 帖子: 1066
- 在线: 798.1小时
- 虫号: 416039
- 注册: 2007-06-29
- 性别: GG
- 专业: 粒子物理学和场论
7楼2013-02-25 23:54:31
华丽的飘过
新虫
- 应助: 41 (小学生)
- 贵宾: 0.116
- 金币: 7633.4
- 散金: 8
- 红花: 48
- 沙发: 1
- 帖子: 1264
- 在线: 892.6小时
- 虫号: 1404465
- 注册: 2011-09-16
- 性别: GG
- 专业: 高等教育学
- 管辖: 物理
8楼2013-02-26 05:37:30
