Create filleR.r