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

famxpencil

如题,FindRoot[]的结果是{t -> **}的形式,如何将其中的数值**提出呢?
" a0 Q- {* k) G
0 I3 G. X7 o/ k+ ~% b! ]此题背景为,想研究一个超越方程的某个参数变化时对根的影响.我最初的想法是

tab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
8 U# f( B$ {7 y" Q1 m! ^+ C. q
ListPlot[ tab ]

可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?
/ n0 M: R1 g0 l! P
  F$ _' y+ a  f+ B- i* C不胜感激.

princekarate

可以试试 expr /. rules
) T( l- i  M6 \1 T比如这里的话就是
& b$ W2 {6 `# n+ T( mtab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
: |' x( ]3 K/ R( C7 Ox/.%
ListPlot[x]
, _& R# |& m5 }! |9 H; ~
如果不行的话可以参考一下documentation center里面这个指令的具体使用

famxpencil

感谢啊,终于解决了
基于楼上的提示,我改成:
tab = Table[ { t /. FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
终于是运行出来了,呵呵.
再次感谢!