R commands added