Using summarise, across, and quantile functions together

Question

I am trying to use mtcars dataset to calculate summary statistics. Here is my code -

df <- as_tibble(mtcars)


df.sum2 <- df %>%
  selec