Update run_analysis.R

write.table command updates (row.name=FALSE)