Re: calculate Recurrence Equations
- To: mathgroup at smc.vnet.net
- Subject: [mg68762] Re: calculate Recurrence Equations
- From: "Dana" <ddelouis at bellsouth.net>
- Date: Fri, 18 Aug 2006 03:12:07 -0400 (EDT)
- References: <ec1a1u$omo$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi. I believe the syntax of your equations are a little off. This worked
for me...
In[1]:=
equ = {
v[0] == 1,
v[n] == v[n - 1] + (v[n - 1]*5 - 1)/100
} ;
In[2]:=
RSolve[equ, v[n], n]
Out[2]=
{{v[n] -> (1/5)*(1 + 4^(1 - n)*(21/5)^n)}}
--
HTH. :>)
Dana DeLouis
Mathematica 5.2
"Frank Hechtner" <frank.hechtner at rub.de> wrote in message
news:ec1a1u$omo$1 at smc.vnet.net...
> hi,
>
> i?m in trouble with my Recurrence Equations:
>
> i?ve defined the following function
>
> anteil[0] = 1
> anteil[n_] := anteil[n - 1] + (anteil[n - 1]*5 - 1)/100
>
> i want mathematica to calculate the values for anteil[30] and so on.
>
> Unfortunately mathematica needs for this calculation over 2 hours (and
> is still running, athlon x2 4600, 2 gb ram).
>
> I don?t see where are the difficulties for mathematica...
>
> Thanx for your help
>
> frank
>