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

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