MathGroup Archive 2005

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

Search the Archive

Do loops in Mathematica

I am having trouble setting up Do loops in Mathematica.  Even when I
put in a return statement, I get no output.  Below is a concrete
example of code I am putting in:

Do[{p = Solve[x^2 + 3*x + 1 == 0, x], Return[2*p]}, {i, 1}]

I get nothing out of it.

Here is a sketch of the code I want to construct but am scared to
because of the above problem I keep encountering.

(1) the first expression in the Do loop calls the FindRoot function on
nonlinear function of x that involves a constant c.  The constant c is
in curly brackets at the end of the Do loop specifying a beginning
value for c and an ending value for c.
(2) I take the root found in the previous expression and I use it to
calculate two numerical integrals
(3) I add or subtract the two numerical integrals found in the previous
expressions and I return the value of this expression (and this
expression alone).

I am having a headache figuring out this simple chore.  Mathematica
simply refuses to behave.

  • Prev by Date: Re: Question to the world: Do you want an computer algebra program with a true GUI?
  • Next by Date: Re: fourier transform of interpolating function
  • Previous by thread: Re: Surface Normal
  • Next by thread: Re: Do loops in Mathematica