       Re: Help on a recursive function

• To: mathgroup at smc.vnet.net
• Subject: [mg53057] Re: Help on a recursive function
• From: Smoll Est <smollest at supereva.it>
• Date: Wed, 22 Dec 2004 04:52:47 -0500 (EST)
• References: <200412160840.DAA27279@smc.vnet.net> <cpue6s\$gb6\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```DrBob wrote:
> If I've copied the definition right, here are a few terms for H = 1, 2, and 3:
>
> Clear@p
> p[H_][i_Integer] /; 0 <= i < H := p[H][i] = a(1 + b)^i
> p[H_][i_Integer?Positive] := p[H][i] =
>    Simplify[(1 + b)p[H][i - 1] - b p[H][i - H]]
>
> p /@ Range@5
> {a, a, a, a, a}

Hello Bobby,
thank you for your attention first of all; I made a *mistake* in the

>>P(i) = (1+b)P(i-1) - b P(i-H)    i>= H

the true formula is:

P(i) = (1+b)P(i-1) - b P(i-H-1)    i>= H

that is "P(i-H-1)" instead of "P(i-H)"

and the limit where:

a / (1-b)

so, the complete formal is:

P(i) = a(1+b)^i     i=0, ..., H-1

P(i) = (1+b)P(i-1) - b P(i-H-1)    i>= H

any idea for its expression in a closed form?

smoll-est

```

• Prev by Date: Sequential evaluation of lists
• Next by Date: Re: An argument pattern problem: ranges and lists
• Previous by thread: Re: Help on a recursive function
• Next by thread: Re: Re: Help on a recursive function