Produce {f[x],g[y],h[z]} in as many ways as possible

Question

I have two lists of equal lengths but for my task I will use 3-element lists , namely {x,y,z} and {f,g,h}. The first contains variables and the second functions.

I want to produce {f[x],g[y],h[z]} with input the above lists in as many ways as possible.

Until now I have devised the following ones:

Inner[#1[#2]&,{f,g,h},{x,y,z},List]

and

MapThread[#1[#2]&,{{f,g,h},{x,y,z}}]

As pointed out , there is a very similar thread at wolfram's community.

If I come up with more solutions I will add them here.

Update

I am updating with the one-liners. In Wolfram's Community forum there are also solutions changing Attributes or using Append but I will omit them here.

MapThread[#1[#2]&,{{f,g,h},{x,y,z}}]

Inner[#1[#2]&,{f,g,h},{x,y,z},List]

Diagonal[Through/@Distribute[{f,g,h}[{x,y,z}],List]

MapThread[Compose,{{f,g,h},{x,y,z}}]

Apply[List,{f,g,h}.{x,y,z}/.Times->(Operate[##1,0]&)] and Apply[List,{f,g,h}.{x,y,z}/.Times->(#1[#2]&)] work only because f,g,h are before x,y,z in alphabetical order as very well pointed out by @andre

 Apply[Compose,Thread[{{f,g,h},{x,y,z}}],{1}]

 (#1[[1]][#1[[2]]]&)/@Transpose[{{f,g,h},{x,y,z}}]

I would not delete - as entry point for the community thread it should be useful. — Yves Klett, Dec 12 '13 at 19:58
Ok , thank you @Yves Klett , I will edit the post and if any more solutions come to my attention (beside that of the community's) i will add them. — tchronis, Dec 12 '13 at 20:02
Apply[List, {f, g, h}.{x, y, z} /. Times -> (Operate[##1, 0] &)] works only because f,g,h are before x,y,z in alphabetical order. The problem is the commutativity of Times. For example Apply[List, {f, g, h}.{a, y, z} /. Times -> (Operate[##1, 0] &)]doesn't work. — andre314, Dec 12 '13 at 20:32
Thanks @andre so this solution would be valid for Subscripts ? There is the same problem with Apply[List, {f, g, h}.{a, y, z} /. Times -> (#1[#2] &)] also — tchronis, Dec 12 '13 at 20:34
I am sorry I meant Array, {f[1],f[2],f[3]} and {x[1],x[2],x[3]} could be used (of course f is still before x in alphabetical order). — tchronis, Dec 12 '13 at 20:43
@kuba thank you for the edit. I needed to break the code above to put some extra comments. — tchronis, Dec 12 '13 at 20:43
This is a subset of: Map-Thread-Through-Apply a list of functions onto a list of (lists of) values. I would like to close it as a duplicate unless you can argue that I do not. — Mr.Wizard, Dec 12 '13 at 20:49
@tchronis It works with {f[1],f[2],f[3]} and {x[1],x[2],x[3]} but one shouldn't rely on this kind of code. — andre314, Dec 12 '13 at 20:50
@Mr.Wizard I agree the link above leads to a broader set of solutions. Give me just a few minutes to copy and see if I can contribute in the link above sometime in the near future. — tchronis, Dec 12 '13 at 20:52
Apply@@@Transpose[{...}] - there is such example but with different syntax. — Kuba, Dec 12 '13 at 21:04
@Mr.Wizard sure this is a subset of the Above Link but many of the solutions need small changes because they are applied in a single element list {{x,y,z}} - so I am not sure if my post finally helps anybody here. I would like to leave this decision to you. Thanks. — tchronis, Dec 12 '13 at 21:15
I am going to close this. I will not delete your question and you may use it to add any additional solutions you find or construct. — Mr.Wizard, Dec 12 '13 at 21:22
Thanks @Mr.Wizard , 9784 is nice but for only one function f. — tchronis, Dec 12 '13 at 21:48

Produce {f[x],g[y],h[z]} in as many ways as possible

0 Answers0