Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2003

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

Search the Archive

Re: Plot a recurrence relation

  • To: mathgroup at
  • Subject: [mg40167] Re: Plot a recurrence relation
  • From: bobhanlon at (Bob Hanlon)
  • Date: Tue, 25 Mar 2003 03:01:40 -0500 (EST)
  • References: <b5mj14$rsa$>
  • Sender: owner-wri-mathgroup at


a[0] =6;
a[n_Integer?Positive] := a[n] = a[n-1]/(2n-9);

pts = Table[{n,a[n]}, {n,0,10}];

ListPlot[pts, PlotStyle -> {AbsoluteDashing[{5,5,2,5}], RGBColor[1, 0, 0]}, 
    Frame->True, Axes->False, PlotJoined->True,
    Epilog->{AbsolutePointSize[4],RGBColor[0, 0, 1],Point /@ pts}];

Bob Hanlon

In article <b5mj14$rsa$1 at>, "David" <davidol at> wrote:

<< Subject:	Plot a recurrence relation
From:		"David" <davidol at>
To: mathgroup at
Date:		Mon, 24 Mar 2003 09:27:00 +0000 (UTC)

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) >><BR><BR>

  • Prev by Date: Ellipse Drawing
  • Next by Date: Re: List in base 16
  • Previous by thread: Re: Plot a recurrence relation
  • Next by thread: RE: Plot a recurrence relation