如何做矢量推导
mathematica吧
全部回复
仅看楼主
level 3
木林刘 楼主
如下图所示：n,u,A均为矢量，有3个分量，最好推导完后是关于A的分量的公式。
2017年12月20日 08点12分 1
level 12
Alexander0620
n = {n1, n2, n3};
u = {u1, u2, u3};
A = {A1[#
#], A2[#
#], A3[#
#]} &[x1, x2, x3];
n.(Grad[\[Phi][x1, x2, x3], {x1, x2, x3}] -
Cross[u, Curl[A, {x1, x2, x3}]]) // FullSimplify
2017年12月20日 11点12分 2
level 12
Alexander0620
2017年12月20日 11点12分 3
level 3
木林刘 楼主
十分感谢。请问结果中的长字符能化简吗？
比如：
能化简成 A1_z（或者别的形式）吗？
2017年12月21日 02点12分 5
xzcyr
在这帖6楼都说过了：https://tieba.baidu.com/p/5490798831
2018年01月06日 08点01分
1