How to compare functions?

Question

Is there a way to compare whether two function objects are the same?

m <- mean
m == mean ## don\'t work

## this seems not to be the correct way:
function         


        

Answer 1

I use isTRUE(all.equal(function1,function2)), but this suffers from similar drawbacks to the other methods.

Interestingly though, all.equal gives a nice summary of how the two operands differ (try all.equal(function1,function2).