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

famxpencil

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

. D4 {" S$ ~1 Y8 R# @此题背景为,想研究一个超越方程的某个参数变化时对根的影响.我最初的想法是
  K& K" k" j$ B/ T7 n1 y
; P! o" Y/ O  Ktab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];

' A, |+ X! o: X! d9 KListPlot[ tab ]
- P) N5 j, }2 \* w
可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?

( c' g. J5 _$ Y: Q; C不胜感激.

princekarate

可以试试 expr /. rules
比如这里的话就是
% ]5 s4 o( \5 v+ k3 P1 y+ ytab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
x/.%
ListPlot[x]

( e0 o) n7 o, C% l如果不行的话可以参考一下documentation center里面这个指令的具体使用

famxpencil

感谢啊,终于解决了
1 @3 ]. T# ?5 Q, u$ i基于楼上的提示,我改成:
tab = Table[ { t /. FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
, a% ^7 t" E. Y3 N4 l: D终于是运行出来了,呵呵.
8 `& l. I3 j" V7 q8 s& \6 V0 i再次感谢!