Add paper for R script and DCT