Applying over a vector of functions

Question

Given a vector (actually a list) of functions:

 fs = c(sin, cos, tan)

and a vector of values:

 xs = c(.1, .3, .5)
         


        

Answer 1

Here's an alternative whose main advantage over the suggestions so far is that it doesn't require that an anonymous function be defined.

mapply(do.call, fs, lapply(xs, list))
# [1] 0.09983342 0.95533649 0.54630249