New version of the paper
R scripts updated