Re: Raise lists of a list to powers

*To*: mathgroup at smc.vnet.net*Subject*: [mg27085] Re: [mg27079] Raise lists of a list to powers*From*: Ken Levasseur <Kenneth_Levasseur at uml.edu>*Date*: Sun, 4 Feb 2001 02:58:13 -0500 (EST)*References*: <200102030959.EAA08599@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Matthias: A combination of MapThread and Transpose does what you want. See below Ken Levasseur UMass Lowell In[3]:= mat = {{a, b, c}, {d, e, f}, {g, h, i}} powers = {r, s, t} In[5]:= MapThread[Power[#1, #2] &, {Transpose[mat + 1], powers}] // Transpose Out[5]= {{(1 + a)^r, (1 + b)^s, (1 + c)^t}, {(1 + d)^r, (1 + e)^s, (1 + f)^t}, {(1 + g)^r, (1 + h)^s, (1 + i)^t}} Matthias.Bode at oppenheim.de wrote: > Dear Colleagues, > > I have a list of lists > > {{a, b, c}, {d, e, f}, {g, h, i}, ...}. > > 1. To each value 1 has to be added. (I can do that.) > > 2. The new values (a+1, b+1, ...) have to be raised to a series of powers: > > a, d, g have to be raised to r; > b, e, h have to be raised to s > and c, f, i to t. > > There is no function governing the exponents r, s, t; they are just a list > of values like -(1/256) or -(1/12). > > Map, Thread, Apply &c. so far knew to thwart my efforts most effectively. > > Thank you very much for your help. > > Matthias Bode > Sal. Oppenheim jr. & Cie. KGaA > Koenigsberger Strasse 29 > D-60487 Frankfurt am Main > GERMANY > Tel.: +49(0)69 71 34 53 80 > Mobile: +49(0)172 6 74 95 77 > Fax: +49(0)69 71 34 6380 > E-mail: matthias.bode at oppenheim.de > Internet: http://www.oppenheim.de

**References**:**Raise lists of a list to powers***From:*Matthias.Bode@oppenheim.de