这是我的源码,
fai={x^3,y^3,z^3}
q={x,y,z};
faiq=D[fai,{q}];
(*给q中变量统一加一个字母d*)
qd=Transpose[{Table[Symbol[i],{i,Table[StringInsert[ToString[i,InputForm],"d",-1],{i,q}]}]}];
faiqqd=faiq . qd;
faiqqdq=D[faiqqd,{q}];
gama=faiqqdq . qd;
qqd=Join[q,Flatten[qd]];
gamaf[qqd]:=Expand@gama
我想把gama的结果定义为一个名为gamaf,变量为qqd的函数,这是一个示例
我的程序里,这个qqd有上百个变量,我想问一下,这应该咋写呢,谢谢
fai={x^3,y^3,z^3}
q={x,y,z};
faiq=D[fai,{q}];
(*给q中变量统一加一个字母d*)
qd=Transpose[{Table[Symbol[i],{i,Table[StringInsert[ToString[i,InputForm],"d",-1],{i,q}]}]}];
faiqqd=faiq . qd;
faiqqdq=D[faiqqd,{q}];
gama=faiqqdq . qd;
qqd=Join[q,Flatten[qd]];
gamaf[qqd]:=Expand@gama
我想把gama的结果定义为一个名为gamaf,变量为qqd的函数,这是一个示例
我的程序里,这个qqd有上百个变量,我想问一下,这应该咋写呢,谢谢
