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

famxpencil

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

# `9 {2 z7 _6 \3 o; Q此题背景为,想研究一个超越方程的某个参数变化时对根的影响.我最初的想法是

; t  g- E' Q) G* T! j9 y0 Itab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];

ListPlot[ tab ]
0 V6 g+ i+ I) ~9 _. J- h& q
# ~: ?$ }# q+ p! S$ u6 q可是ListPlot[]是无法识别{t -> **}形式的参数的.有什么函数可以将{t -> **}中的数值提出呢?或者,有没有什么更好的办法可以绕开这些表达式呢?
+ q3 M, w$ ?( [" Y" v- e6 f
5 M( @* l0 o. ^( S: |& M不胜感激.

famxpencil

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

princekarate

可以试试 expr /. rules
比如这里的话就是
- m: x7 b6 W3 q. i% {6 ptab = Table[ { FindRoot[ (a COMPLICIATE expr) == 0, {t, t0} ], x }, {x, xmin, xmax, di} ];
x/.%
5 R7 a; w, O# ]& V4 F2 ?* zListPlot[x]

6 y( ~4 F0 l0 I3 p; `5 R# j5 H$ }5 n如果不行的话可以参考一下documentation center里面这个指令的具体使用