用mathematica计算点到线的距离求点(1,1,4)到直线l:(x-3)/-1 =y/0=(z+1)/2的距离.麻烦给个完整_数学解答

用mathematica计算点到线的距离
求点(1,1,4)到直线l:(x-3)/-1 =y/0=(z+1)/2的距离.麻烦给个完整代码,

人气：105 ℃　时间：2020-06-14 02:49:43

解答

f[t_] := (-t + 3 - 1)^2 + 1 + (2 t - 1 - 1)^2
Sqrt[f[t]/.Solve[f'[t]==0,t][[1]]