Thinking about in shell and in R, but its not in parallel