MathGroup Archive 2011

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

Search the Archive

Short-cut for reiteration, via postfix usage of Table as pure

  • To: mathgroup at smc.vnet.net
  • Subject: [mg118375] Short-cut for reiteration, via postfix usage of Table as pure
  • From: "Christopher O. Young" <cy56 at comcast.net>
  • Date: Mon, 25 Apr 2011 07:27:37 -0400 (EDT)
  • References: <iorih5$o6t$1@smc.vnet.net> <ip14qm$ged$1@smc.vnet.net>

I get a little tired of the excess typing involved with using Table for
simple reiteration of functions with a parameter list. Since Mathematica
doesn't seem to use "T" for anything, it's handy to just re-define this to
mean Table. Then use a postfix call with a "#" as a slot for the argument
and an ampersand "&" at the end to indicate a pure function. See
ref/Function in the Mathematica Help for details.


T = Table;



Graphics[
 Line[{{0, 10 - k}, {k, 0}}] // T[#, {k, 0, 9}] &
 ]

>> I have the following bit of graphics:
>> 
>>    Graphics[{
>>   Line[{{0, 10}, {1, 0}}],
>>   Line[{{0, 9}, {2, 0}}],
>>   Line[{{0, 8}, {3, 0}}],
>>   Line[{{0, 7}, {4, 0}}],
>>   Line[{{0, 6}, {5, 0}}],
>>   Line[{{0, 5}, {6, 0}}],
>>   Line[{{0, 4}, {7, 0}}],
>>   Line[{{0, 3}, {8, 0}}],
>>   Line[{{0, 2}, {9, 0}}],
>>   Line[{{0, 1}, {10, 0}}],
>>   }]
>> 
>> 
>> I want to simplify it to do some sort of iteration to compute the end points
>> of the lines. I can do this easily in a variety of procedural languages but
>> I haven't yet grokked how Mathematica would do this.



  • Prev by Date: Re: How to roll up multiple Line calls into a loop
  • Next by Date: Short-cut for reiteration, via postfix usage of Table as pure
  • Previous by thread: creating correct latex output for Symbolize'd variables
  • Next by thread: Short-cut for reiteration, via postfix usage of Table as pure