RE: calculate Recurrence Equations

*To*: mathgroup at smc.vnet.net*Subject*: [mg68793] RE: [mg68713] calculate Recurrence Equations*From*: "Erickson Paul-CPTP18" <Paul.Erickson at Motorola.com>*Date*: Fri, 18 Aug 2006 03:12:55 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Do you need exact answers as integer factions? In[1]:= anteil[0] := 1. ; anteil[n_] := 1.05 anteil[n - 1] - .01 ; In[6]:= Table[ { i, anteil[i]}, { i, 0, 35 } ] // TableForm Seems to execute quickly. I'm not sure why, but when there are two references, it seems to get lost. Paul -----Original Message----- From: Frank Hechtner [mailto:frank.hechtner at rub.de] To: mathgroup at smc.vnet.net Subject: [mg68793] [mg68713] calculate Recurrence Equations 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