Re: Equation
- To: mathgroup at smc.vnet.net
- Subject: [mg26654] Re: Equation
- From: Lawrence Walker <lwalker701 at earthlink.net>
- Date: Sat, 13 Jan 2001 22:36:25 -0500 (EST)
- Organization: Morgan State University: COMSARE
- References: <93kn7o$747@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
I would use either of the following:
where, equ = i == R - R((1 + .05)^10-1)/((1 + R)^10-1);
1. Solve[equ,R]
2. FindRoot[Evaluate[equ /. i -> 1], {R, .1}]
Note that '1' gives a solution with Root in it implying that the
solution can have multiple roots. '2' only finds a solution if you
provide what is 'i' should be and where R should start. In this case
'i' was set to 1 and R is initially set to be 0.1 .
Lawrence
Jose Lasso wrote:
> Hi,
>
> I have little experience with Mathematica, I change to Mathematica
> few months ago, I want to solve: i = R - R((1 + .05)^10-1)/((1 +
> R)^10-1) for R, how can I do this task in Mathematica??. Thx in
> advance. Regards.
>
> Jose M Lasso
>
> PS:Happy new year!!
--
------------------------------------------------------------
(\___/) The fear of the LORD is the beginning of
(o\ /o) wisdom: a good understanding have all they
/|:.V.:|\ that do his commandments: his praise
\\:::::// endureth for ever. Psa 111:10
-----`"" ""`------------------------------------------------
Lawrence A. Walker Jr., M.Eng./Ph.D. Candidate
Morgan State University
Clarence M. Mitchell School of Engineering
COMSARE (Center Of Microwave/Satellite And RF Engineering)
(443)885-1453
------------------------------------------------------------