level 2
麦兜的肾
楼主
第一次使用mathematics,仿照如下方程和代码

DSolve[{D[t[tau, x], tau] == lambda D[t[tau, x], x, x], t[0, x] == t0, D[t[tau, x], x] == 0 /. x -> 0, t[tau, L] == tL}, t, {tau, x}]

这里不太懂k[1]是啥意思
进行求解我自己的方程,求T(r,z,t)的解析式,方程如下:

在输入代码过程中我用t代表我上边方程中的T,用tau代替方程中的t;代码如下
DSolve[{a*D[t[tau,r,z],tau]==b*D[t[tau,r,z],r,r]+b*D[t[tau,r,z],z,z]+c*Exp[-r2/d2]*tau/e2*Exp[-tau/e]*Exp[-f*z],t[0,r,z]==300,-b*D[t[tau,r,z],z]==g*Exp[-r2/d2]*tau/e2*Exp[-tau/e]/.z->0,-b*D[t[tau,r,z],z]==0/.z->h},t,{tau,r,z}]
计算结果如下

这里结果我看分了好几个,是我输入公式错误吗,希望高手能给我解惑
2020年07月21日 02点07分
1

DSolve[{D[t[tau, x], tau] == lambda D[t[tau, x], x, x], t[0, x] == t0, D[t[tau, x], x] == 0 /. x -> 0, t[tau, L] == tL}, t, {tau, x}]
这里不太懂k[1]是啥意思进行求解我自己的方程,求T(r,z,t)的解析式,方程如下:

在输入代码过程中我用t代表我上边方程中的T,用tau代替方程中的t;代码如下DSolve[{a*D[t[tau,r,z],tau]==b*D[t[tau,r,z],r,r]+b*D[t[tau,r,z],z,z]+c*Exp[-r2/d2]*tau/e2*Exp[-tau/e]*Exp[-f*z],t[0,r,z]==300,-b*D[t[tau,r,z],z]==g*Exp[-r2/d2]*tau/e2*Exp[-tau/e]/.z->0,-b*D[t[tau,r,z],z]==0/.z->h},t,{tau,r,z}]
计算结果如下
这里结果我看分了好几个,是我输入公式错误吗,希望高手能给我解惑