# Copy and paste this into an R console and run it. N <- 200000; n <- 10; Result <- rep(0, n); for( i in 1:n){ # Write to the console what loop iteration we're on cat( 'Calculating iteration: ', i, '\n'); # Do something and put the answer in Result. for(j in 1:N){ # this for loop is to slow down execution Result[i] <- j+i; } } save(Result, file='MyResultsFile.RData');