Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

My first calculator =)

  • To: mathgroup at smc.vnet.net
  • Subject: [mg100999] My first calculator =)
  • From: Lobotomy <labbman at gmail.com>
  • Date: Fri, 19 Jun 2009 20:48:52 -0400 (EDT)

Hello. I just started to learn mathematica a few days ago. Im trying
to make a calculator that can graphically represent the relationship
between:

savings
interest
time

the mathematical formula im using you can see below.

this is what I've written sofar...







Manipulate[


 **%% Here i would like to make a "ListLinePlot" using this function:

(#1*(1 + #2/#3)^(#3*#4) - 1)/(#2/#3) &[d, g, f, n]


then I would like to use the below controlls to manipulate the values
of d,g,f and n. How is this done?

I understand that there has to be some kind of list or table that
contains the accumulated sum at certain times. But I have no clue how
to make this list. The problem with my function is that it only
calculates the correct final answer. for example

"if i invest 1000=80 per month with 5% interest for 8 years, what is the
accumulated sum?"



 GridLines -> Automatic,



 {{f, 1, "Frequency"}, {1 -> "Annually", 1/4 -> "Quarterly",
   1/12 -> "Monthly"}},
 Delimiter,



 {{a, 5000, "Initial Investment"}, 0, 10000000, 1000,
  Appearance -> {"Open", "Labeled"}},

 {{d, 0, "Added Contributions/yr"}, -500000, 500000, 1000,
  Appearance -> {"Open", "Labeled"}},

 {{g, 0.05, "Growth(%/100)"}, 0, 1, 0.05,
  Appearance -> {"Open", "Labeled"}},

 {{n, 5, "Years"}, 1, 100, 1, Appearance -> {"Open", "Labeled"}},



 ControlPlacement -> Left]


  • Prev by Date: Re: SphericalHarmonics strange behavior
  • Next by Date: Re: ContourPlot3D and NIntegrate
  • Previous by thread: Re: BarChart and Ticks
  • Next by thread: TeX output via TeXForm: variable name translation