求助:如何将FindRoot[]的结果转化成数值形式?

famxpencil

如题,FindRoot[]的结果是{t -> **}的形式,如何将其中的数值**提出呢?

此题背景为,想研究一个超越方程的某个参数变化时对根的影响.我最初的想法是

tab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
7 x7 Q8 Q- h2 @8 N. d
' Y! R# E) i5 r& E: w: uListPlot[ tab ]

可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?

2 X$ J' j. K2 N# H, n6 h+ }2 e) r不胜感激.

princekarate

可以试试 expr /. rules
. U0 X, \" C/ N* d比如这里的话就是
& X- _& E+ [9 |' b$ Itab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
" Q" p2 R# D; o$ ^' Dx/.%
ListPlot[x]
. S( [- ?5 O" D4 m. z) B3 N3 `
如果不行的话可以参考一下documentation center里面这个指令的具体使用

famxpencil

感谢啊,终于解决了
6 l2 M5 Y# t% L- O' B2 M; K/ d7 N; d6 U+ x基于楼上的提示,我改成:
% P9 ]$ A4 H# C) l8 Utab = Table[ { t /. FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
终于是运行出来了,呵呵.
0 W( j( v0 U2 C7 j/ E# E" i再次感谢!