Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2002
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2002

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

Search the Archive

RE: Simple Recursive Map

  • To: mathgroup at smc.vnet.net
  • Subject: [mg35442] RE: [mg35398] Simple Recursive Map
  • From: "John C. Erb, Ph.D." <John_C_Erb at prodigy.net>
  • Date: Fri, 12 Jul 2002 04:29:13 -0400 (EDT)
  • Reply-to: <John_C_Erb at prodigy.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Reuben,

Does the following do what you want?

a = 2;
b = 3;
f[0] = 1;
g[0] = 1;
f[n_] := f[n] = g[n - 1] - a*n^1 - 1;
g[n_] := g[n] = b*(n - 1);


John C. Erb

email: John_C_Erb at prodigy.net

-----Original Message-----
From: Reuben [mailto:reubengann at hotmail.com]
To: mathgroup at smc.vnet.net
Subject: [mg35442] [mg35398] Simple Recursive Map


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: symbolic and indefinite differentiation
  • Next by Date: Re: Simple Recursive Map
  • Previous by thread: Re: Simple Recursive Map
  • Next by thread: Re: Simple Recursive Map