Error in file(file, ifelse(append, “a”, “w”)) : invalid 'description' argument

Question

I am trying to create a function that takes a data frame of, at least, 100 variables and slice it so I can end up with multiple dfs that always contains the first 5 variable