Running IDR R code