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

famxpencil

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

$ y( E, c6 c% J% N此题背景为,想研究一个超越方程的某个参数变化时对根的影响.我最初的想法是
# p& R. i6 g) ~/ ^
1 W+ }2 H6 H4 z, i4 btab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];

ListPlot[ tab ]
! d$ Y! n" k2 S3 m: G9 \
可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?
2 c# C7 ~$ C4 l, E* S" Q
5 }  T8 n6 k8 e6 D不胜感激.

princekarate

可以试试 expr /. rules
比如这里的话就是
2 g  P( `( s$ w6 k  }1 _0 _8 F, Ktab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
( E% w. v: @) Y  @x/.%
ListPlot[x]
* u3 a% t* q; C' H2 H0 V
6 V) M- N7 p0 c如果不行的话可以参考一下documentation center里面这个指令的具体使用

famxpencil

感谢啊,终于解决了
$ N" H+ B9 f; x, b( j基于楼上的提示,我改成:
tab = Table[ { t /. FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
! n$ o( t- D5 h- |& z& \$ ^终于是运行出来了,呵呵.
再次感谢!