- run_analysis.R
  . add functions "read_file()" and "read_data()".