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

famxpencil

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

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

tab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
9 g) j# P5 Y$ y1 e- `
ListPlot[ tab ]
. i% m5 S4 T0 C) F! v
可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?
  r3 ?* f$ r& j
0 Z! b/ e  L- F/ Y9 i  Q# }# p不胜感激.

princekarate

可以试试 expr /. rules
比如这里的话就是
  L4 E0 A( o8 e, x% R* G% X7 Q% Itab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
x/.%
# x9 i. a6 `  X  ?- X1 |ListPlot[x]
8 a/ D2 `. P# W& t
# T( q5 H& P, l4 H) B4 N如果不行的话可以参考一下documentation center里面这个指令的具体使用

famxpencil

感谢啊,终于解决了
基于楼上的提示,我改成:
" U; x* J- C6 _tab = Table[ { t /. FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
终于是运行出来了,呵呵.
; w/ a9 C2 f7 o  k* U# z再次感谢!