merge of R files with pbiecek