作业帮问个Mathematica求方程数值解的问题FindRoot[psi[r] == 12,{r,1},WorkingPrecision -> 10]Out[168] {r -> 17.58534817}解是解出来了,但怎么把解自动赋值给其他变量,以供后续运算
来源：学生作业帮助网 编辑：作业帮 时间：2024/05/11 02:37:08
![问个Mathematica求方程数值解的问题FindRoot[psi[r] == 12,{r,1},WorkingPrecision -> 10]Out[168] {r -> 17.58534817}解是解出来了,但怎么把解自动赋值给其他变量,以供后续运算](/uploads/image/z/6363209-65-9.jpg?t=%E9%97%AE%E4%B8%AAMathematica%E6%B1%82%E6%96%B9%E7%A8%8B%E6%95%B0%E5%80%BC%E8%A7%A3%E7%9A%84%E9%97%AE%E9%A2%98FindRoot%5Bpsi%5Br%5D+%3D%3D+12%2C%7Br%2C1%7D%2CWorkingPrecision+-%3E+10%5DOut%5B168%5D+%7Br+-%3E+17.58534817%7D%E8%A7%A3%E6%98%AF%E8%A7%A3%E5%87%BA%E6%9D%A5%E4%BA%86%2C%E4%BD%86%E6%80%8E%E4%B9%88%E6%8A%8A%E8%A7%A3%E8%87%AA%E5%8A%A8%E8%B5%8B%E5%80%BC%E7%BB%99%E5%85%B6%E4%BB%96%E5%8F%98%E9%87%8F%2C%E4%BB%A5%E4%BE%9B%E5%90%8E%E7%BB%AD%E8%BF%90%E7%AE%97)
问个Mathematica求方程数值解的问题FindRoot[psi[r] == 12,{r,1},WorkingPrecision -> 10]Out[168] {r -> 17.58534817}解是解出来了,但怎么把解自动赋值给其他变量,以供后续运算
问个Mathematica求方程数值解的问题
FindRoot[psi[r] == 12,{r,1},WorkingPrecision -> 10]
Out[168] {r -> 17.58534817}
解是解出来了,但怎么把解自动赋值给其他变量,以供后续运算
问个Mathematica求方程数值解的问题FindRoot[psi[r] == 12,{r,1},WorkingPrecision -> 10]Out[168] {r -> 17.58534817}解是解出来了,但怎么把解自动赋值给其他变量,以供后续运算
a=r /.{r -> 17.58534817};
Print[a];
(*再按shift + enter*)
定义一个浮点变量