Table[{Exponent[#, Variables[expr]]} & /. List -> f, {f, {f1, f2}}](* {f1[Exponent[#1, Variables[expr]]] &, f2[Exponent[#1, Variables[expr]]] &} *)↧
Answer by MelaGo for Applying several functions to the same argument
↧