       Re: how to iterate

• To: mathgroup at smc.vnet.net
• Subject: [mg65966] Re: [mg65948] how to iterate
• From: Bob Hanlon <hanlonr at cox.net>
• Date: Tue, 25 Apr 2006 05:18:34 -0400 (EDT)
• Reply-to: hanlonr at cox.net
• Sender: owner-wri-mathgroup at wolfram.com

```Clear[f];
f=1; f=2; f=3;
f[n_Integer?Positive]:=f[n]=(f[n-1]+f[n-2]+1)/f[n-3];

Table[{n,f[n]},{n,12}]

{{1, 1}, {2, 2}, {3, 3}, {4, 6}, {5, 5}, {6, 4}, {7, 5/3}, {8, 4/3}, {9, 1}, {10, 2}, {11,
3},
{12, 6}}

Bob Hanlon

>
> From: "vr" <valentino.rossi.85 at gmail.com>
To: mathgroup at smc.vnet.net
> Subject: [mg65966] [mg65948] how to iterate
>
> hi all,
>
> pls excuse my ignorance. i'm still new to mathematica, and i forgot
> much of what i had learned.
>
> how can i list the output of the function below for n=4..2006?
> f(n) = ( f(n-1) + f(n-2) + 1 ) / f(n-3)
> given f(1)=1, f(2)=2, f(3)=3.
>
> thanks for any help in advance.
>
>

```

• Prev by Date: NIntegrate with a J/Link Function
• Next by Date: Re: A simple problem
• Previous by thread: Re: how to iterate
• Next by thread: Re: how to iterate