Update run_analysis.R

Made to work with data in working directory.