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

MathGroup Archive 2009

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

Search the Archive

Re: Do-command

  • To: mathgroup at smc.vnet.net
  • Subject: [mg102639] Re: [mg102588] Do-command
  • From: "Elton Kurt TeKolste" <tekolste at fastmail.us>
  • Date: Mon, 17 Aug 2009 04:06:20 -0400 (EDT)
  • References: <200908161038.GAA01118@smc.vnet.net>

Do does not ask for an output.  Try this

In[24]:= Table[Select[{1, 2, 4, 7, 6, 2}, # >= i &], {i, 7}]

Out[24]= {{1, 2, 4, 7, 6, 2}, {2, 4, 7, 6, 2}, {4, 7, 6}, {4, 7, 
  6}, {7, 6}, {7, 6}, {7}}

If this is too functional for you, here is a procedural version, in
which the selections are saved in a variable (a) and then displayed

In[27]:= a = Range[7]; Do[
 a[[i]] = Select[{1, 2, 4, 7, 6, 2}, # >= i &], {i, 7}]; a

Out[27]= {{1, 2, 4, 7, 6, 2}, {2, 4, 7, 6, 2}, {4, 7, 6}, {4, 7, 
  6}, {7, 6}, {7, 6}, {7}}

On Sun, 16 Aug 2009 06:38 -0400, "Uwe Gotzes" <u.gotzes at googlemail.com>
wrote:
> Hi!
> 
> Can anybody tell, why
> Do[Select[{1, 2, 4, 7, 6, 2}, # >= i &], {i, 7}]
> does not produce output in Mathematica?
> 
Regards,
Kurt Tekolste



  • References:
    • Do-command
      • From: Uwe Gotzes <u.gotzes@googlemail.com>
  • Prev by Date: Re: Generating a list numnber in string format
  • Next by Date: Re: Generating a list numnber in string format
  • Previous by thread: Re: Do-command
  • Next by thread: Re: Do-command