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