Modified all R files to use png() instead of dev.copy()