Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1996
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1996

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

Search the Archive

Re: Function

  • To: mathgroup at smc.vnet.net
  • Subject: [mg3830] Re: Function
  • From: rhall2 at umbc.edu (hall robert)
  • Date: Mon, 29 Apr 1996 00:30:12 -0400
  • Organization: University of Maryland, Baltimore County
  • Sender: owner-wri-mathgroup at wolfram.com

In article <4letbt$esv at dragonfly.wolfram.com>,
Roberto Diego  <roberto at medusa.es> wrote:
>
> I4m trying to find a function that works on a list like {a1, a2, a3, 
>a4, ..., an} and returns a list like {a2/a1, a3/a2, a4/a3, ... an/an-1}. 

In[26]:=
   l = { a1, a2, a3, a4, a5, a6, a7, a8, a9 };
   divideList[ l_List ] := Table[
	   l[[ lpart ]] / l[[ lpart - 1 ]], { lpart, 2, Length[ l ] }
   ]
In[28]:=
   divideList[ l ]
Out[28]=
     a2  a3  a4  a5  a6  a7  a8  a9
   { --, --, --, --, --, --, --, -- }
     a1  a2  a3  a4  a5  a6  a7  a8

Aside from arithmetic operators, I think Table[] is used more
than any other function in Mathematica.

-- 
Bob Hall            | "Know thyself? Absurd direction!
rhall2 at gl.umbc.edu  |  Bubbles bear no introspection."  -Khushhal Khan Khatak

==== [MESSAGE SEPARATOR] ====


  • Prev by Date: Bottom line on remote kernel
  • Next by Date: Re: Function
  • Previous by thread: Function
  • Next by thread: Re: Function