MathGroup Archive 2002

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

Search the Archive

Re: Simple Recursive Map

  • To: mathgroup at smc.vnet.net
  • Subject: [mg35421] Re: Simple Recursive Map
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 12 Jul 2002 04:28:33 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <agjius$24s$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

iter[{x_, y_}, {a_, b_}] := {y - a*x^2 - 1, b*x}

Nest[iter[#, {a, b}] &, {x0, y0}, 50]

?

Regards
  Jens

Reuben wrote:
> 
> I have the map
> 
> x_n+1=y_n-a*(x_n)^2 - 1
> y_n+1=b*x_n
> 
> If I specify a,b, x_0 and y_0, how can I make Mathematica iterate
> through this numerically to give me x_50 and y_50?
> 
> Thanks
> Reuben


  • Prev by Date: Re: mathematica & social science
  • Next by Date: Re: symbolic and indefinite differentiation
  • Previous by thread: Re: Simple Recursive Map
  • Next by thread: RE: Simple Recursive Map