DE scripts for R