Rdata saved to avoid continuous repeat of for loops