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