sapply(mapply(compose,f1,f2),do.call,list(.5))
[1] 0.5 0.5 0.5