Conditional colwise

This adds a .if argument to summarise_each and mutate_each. `.if` refers to a predicate function that is used to operate selectively on the columns of the data frame.

```
diamonds %>%
  mutate_each(funs(as.character), .if = is.factor)
```