Added Step #3 to R-scripts...