R tricks >

Mutate all numeric columns in a data frame

library(dplyr)

iris %>%
  mutate_if(is.numeric, ~ . / Petal.Width)