added a first working version of diaData.R