ListPlot[Table[n^2/(2^n - 1),{n,1,20}]]