mix.fun function

Apply function to numerical columns of a mixed data.frame while ignoring non-numeric fields