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