Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Nonatomic expression ? in Append command

• To: mathgroup at smc.vnet.net
• Subject: [mg32857] Re: [mg32832] Nonatomic expression ? in Append command
• From: Tomas Garza <tgarza01 at prodigy.net.mx>
• Date: Fri, 15 Feb 2002 02:50:07 -0500 (EST)
• References: <200202140644.BAA19422@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

I suggest you devote some time to learning functional programming, which is
one of the great beauties of Mathematica, and forget all about loops and
procedural programming.

Anyway, it is not clear to me what is it you're trying to achieve in your
routine below. To start with, since no initial value is assigned to
omegaAlist, it is clear that you can't Append anything to it in the first
loop. This is why you get the message.

Secondly, surely you are aware that r++ increases the value of r by 1,
returning the old value of r. Then you cannot go further than the first
loop, since the test r<=1 gives False immediately after the first loop.

Tomas Garza
Mexico City

----- Original Message -----
From: "Takayuki MAKINO" <tmakino at spectro.ujf-grenoble.fr>
To: mathgroup at smc.vnet.net
Subject: [mg32857] [mg32832] Nonatomic expression ? in Append command


> bonjour
>
> I am very happy to meet you all. My name is Takayuki. It is my great
> pleasure to know the existense of such beautiful community. I would like
> to perform the loop calculation by writing the following code in
> Mathematica. Then, the result of calculation should be stored in some
> lists, assuming the name of list is "omegaAlist". If one performs that
> code, the error message will be output. The contents of which is the
> following:
>
> (1)$B!V(BAppend::"normal": "Nonatomic expression expected at position 1
> in Append[omegaAlist, 0.007]."$B!W(B
>
> (2)$B!V(B$RecursionLimit::"reclim": "Recursion depth of \!\(256
> \) exceeded."$B!W(B
>
> I do not know how to work around this problem. Please help me to
> eliminate this obstacle, if there are experts who are familiar with
> these kinds of things.!!!
>
> ------------------------------------------------
>
> Clear[et1,omegaAlist]
> For[r =0, r <= 1, r++
>
> et1 = 3.444 + r*0.001
>
> omegaAlist = Append[omegaAlist, N[et1]];
> ]
> omegaAlist = Delete[omegaAlist, 1];
>
>
>

• References:
  • Nonatomic expression ? in Append command
    • From: Takayuki MAKINO <tmakino@spectro.ujf-grenoble.fr>