MathGroup Archive 2002

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

Search the Archive

Re: help: recursive functions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg32625] Re: help: recursive functions
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 1 Feb 2002 02:02:26 -0500 (EST)
  • Organization: Universitaet Leipzig
  • References: <a3aqpd$4cv$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

let the recursion terminate with

y[0]=1
y[1]=1

?

*and* never ask for non integer arguments like
Plot[] will do ?

ListPlot[Table[y[n],{n,0,320}]]

??

Regards
  Jens

Okke wrote:
> 
> Hello,
> 
> I'm having some problems with a recursive function.
> Could somebody please help me by telling me how I
> should enter such a function?
> 
> tia,
> 
> This is what I've done so far:
> 
> f[n_]:=Sin[Pi*n*(0.05+(0.0005*n))]
> y[n_]:=1.5*y[n-1]-0.85*y[n-2]+f[n]
> 
> I'm trying to Plot[y[n],{n,0,320}] but that gives me
> an error: $RecursionLimit::reclim: Recursion depth of 256 exceeded.
> 
> btw, is there an option to fill the area under the sine?
> 
> --
> Okke
> 
> remove NOSPAM from my email address to reply


  • Prev by Date: Re: excessive RAM use with Mathematica
  • Next by Date: RE: dropping higher order terms
  • Previous by thread: Re: excessive RAM use with Mathematica
  • Next by thread: Re: help: recursive functions