MathGroup Archive 2002

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: To plot solutions, FindRoot as a function


Hi,

*What* can youe do ? Read the manual carefull ?

sol[a_?NumericQ, b_?NumericQ] := 
  x /. FindRoot[a*Tanh[b*x] == x, {x, {0.01, 0.1}}]
Plot3D[sol[a, b], {a, 1, 2}, {b, 1, 2}]

Regards
  Jens

Veniamin Abalmassov wrote:
> 
> Hello,
> 
> I'd like to plot the solution of an equation which depends on two
> parameters, e.g.
> 
> a*Tanh[b*x] == x
> 
> So, I'd like to see it in 3D, one axis is "a", other is "b", and the last
> is "solution".
> 
> I've tried naively to do it as follows:
> 
> sol[a_,b_]:=FindRoot[a*Tanh[b*x] == x, {x, {0.01, 0.1}}]
> Plot[sol[a,b], {a, 1, 2}, {b, 1, 2}]
> 
> And it doesn't work. Help me, please. What can I do?
> 
> Thanks a lot,
> 
> Veniamin


  • Prev by Date: RE: To plot solutions, FindRoot as a function
  • Next by Date: Vector field with ImplicitPlot ?
  • Previous by thread: RE: To plot solutions, FindRoot as a function
  • Next by thread: RE: To plot solutions, FindRoot as a function