       RE: Plot a recurrence relation

• To: mathgroup at smc.vnet.net
• Subject: [mg40173] RE: Plot a recurrence relation
• From: "tgarza01 at prodigy.net.mx" <tgarza01 at prodigy.net.mx>
• Date: Tue, 25 Mar 2003 03:02:55 -0500 (EST)
• Reply-to: tgarza01 at prodigy.net.mx
• Sender: owner-wri-mathgroup at wolfram.com

```In:=
<< DiscreteMath`RSolve`

In:=
sol = RSolve[{a[n + 1] ==
a[n]/(2*n - 7), a == 6},
a[n], n]

Out=
{{a[n] -> (3*2^(1 - n))/
Pochhammer[-(7/2), n]}}

In:=
ListPlot[Table[{n, a[n] /.
sol[]}, {n, 0, 10}],
PlotStyle -> {Hue,
PointSize[0.0125]}];

Tomas Garza
Mexico City

Original Message:
-----------------
From: David davidol at hushmail.com
To: mathgroup at smc.vnet.net
Subject: [mg40173]  Plot a recurrence relation

How can I get mathematica to plot a sequence that's defined recursively e.g.

a_0 = 6
a_(n+1) = a_n / (2n - 7)

Cheers.

--------------------------------------------------------------------
mail2web - Check your email from the web at
http://mail2web.com/ .

```

• Prev by Date: DSolve and N do not commute
• Next by Date: Mlink, listen and connect, help
• Previous by thread: Re: Plot a recurrence relation
• Next by thread: Re: Plot a recurrence relation