for loop over every nth element in R

Question

I have a some files in a folder and I could list them using dir()

epochs <- dir(path = paste0(getwd(), "/", "model"))
# sort epochs in