I need somefunction[{f,g,h},{1,2,3}] => {f[1],g[2],h[3]}

Questions
1

I need somefunction[{f,g,h},{1,2,3}] => {f[1],g[2],h[3]}

I would call it mapus and this works, but is a bit longish

mapus[functions, data] := Table[Apply[functions[[i]], {data[[i]]}], {i, 1, Length[functions]}];
Including the Blanks that are not shown here. You need the curly brackets around data
because Apply will not work on Atomic expressions.

Anybody knows how to do this?

2

Maybe this will work?

k[n_, m_] := n[[#]] @ m[[#]] & /@ Range[Length[n]]

Output:

k[{f, g, h}, {1, 2, 3}]
{f[1], g[2], h[3]}
3

In[3]:= MapThread[Compose, {{f, g, h}, {1, 2, 3}}]

Out[3]= {f[1], g[2], h[3]}

See this thread for alternative ways.

4

Hi Ilian,

Thanks a lot man, just what I need!

Joris