Edited run_analysis.R so now it doesn't have type error