## sample data
set.seed(123)
dat <- data.frame(matrix(rnorm(28), nc = 7))
names(dat) <- c("Col1", "Col1", "Col1", "Col2", "Col3", "Col3", "Col4")
dat
rmDuplCols(dat)
rmDuplCols(dat, keep_first = FALSE)
Run the code above in your browser using DataLab