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

AW: Conversion Function -> List

• To: mathgroup at smc.vnet.net
• Subject: [mg44738] AW: [mg44726] Conversion Function -> List
• From: Klamser at t-online.de (Peter Klamser)
• Date: Mon, 24 Nov 2003 00:05:25 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

Hi,

f = #1 #2 + Sin[#1] Cos[#1] &

defines a function.

f[[0]]

shows the head of f.

f[[1]]

shows the function.

Variables[f[[1]]]

returns a list.

Regards

Peter

-----Ursprüngliche Nachricht-----
Von: Vadim Zelenkov [mailto:zelenkov at mail333.com]
Gesendet: Samstag, 22. November 2003 08:17
An: mathgroup at smc.vnet.net
Betreff: [mg44726] Conversion Function -> List


Hello!

Given a function
    x y + Sin[x] Cos[y]

I need to convert it into the list
    {{x,y},{Sin[x],Cos[x]}}

Generally, the purpose to convert a function
    Sum[p[i,x] q[i[y], {i,1,n}]

into the list
    {{p[1,x],q[1,y]},...,{p[n,x],q[n,y]}

How to do it using Mathematica?

Thanks in advance!

V.Z.

P.S, If possible please duplicate your answers to zelenkov[at]mail333.com