Create run_analysis.R

ver 1.2, 
in 2) deselect meanFraq columns, using mean\\(\\)
in 5) add row.name=FALSE