revised run_analysis.R

needed to add “row.names=FALSE” to the write.table function