simplify r D[((1+r)^n-1)/r,{r,1}]/ (((1+r)^n-1)/r)