Added (encrypted) csv files
Rewritten R script