Update run_Analysis.R

added library(gdata)