Initial version of R scripts to analysis different data sets