r passing multiple column to funtion for fixing outlier

Question

summary(standard_airline)


#outlier treatment
outFix  <- function(x){

      quant <- quantile(x,probs = c(.25,.75))

      h     <- 1.5*IQR(x,na.rm = T)