Re: Equation
- To: mathgroup at smc.vnet.net
- Subject: [mg26645] Re: [mg26614] Equation
- From: BobHanlon at aol.com
- Date: Sat, 13 Jan 2001 22:36:20 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Table[{i, R} /. FindRoot[
i == R - R*(((1 + 0.05)^10 - 1)/((1 + R)^10 - 1)), {R, i}],
{i, 0.00001, 10}]
Plot[R /. FindRoot[i == R - R*(((1 + 0.05)^10 - 1)/((1 + R)^10 - 1)), {R,
i}], {i, 0, 10}];
Bob Hanlon
In a message dated 2001/1/11 11:19:11 AM, jml at accessinter.net writes:
>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.
>