Error in x$slide : $ operator is invalid for atomic vectors, when calling pipelined functions with passing arguments I have this code for making a ppt from R: