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

famxpencil

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

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

tab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
: N/ E- v: b6 n4 B, ~2 H
0 C4 ^6 i3 G5 K; U, G4 eListPlot[ tab ]

可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?
! @; s% D% m3 q: c' D
不胜感激.

princekarate

可以试试 expr /. rules
比如这里的话就是
) A- T' z' {: i7 u7 Otab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
) E" {! u" e1 ]x/.%
ListPlot[x]
! C  g$ g1 m& v, G& Y
- q: g  g; i9 L& s3 U如果不行的话可以参考一下documentation center里面这个指令的具体使用

famxpencil

感谢啊,终于解决了
5 o* L# g* t) K- ^. l1 G基于楼上的提示,我改成:
tab = Table[ { t /. FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
终于是运行出来了,呵呵.
( H/ m0 f. y7 R" k  ]+ O; J& W. E# k$ x再次感谢!