Update General_script.R

adding changes... :)