Divide all columns by a chosen column using mutate_all

Question

I have a sample data frame that looks like this (my full dataframe has \"d\" plus 57 elements):

d <- seq(0, 100, 0.5) 
Fe <- runif(201, min = 0, max =          


        

Answer 1

UPDATE to answer by @arg0naut91 (dplyr 1.0.0)

Example_Ratio <- example %>% 
  mutate(across(everything()), . / Zr) %>% 
  select(Ratio_Elements)