OFFSET
1,1
MATHEMATICA
a=36; b=0;
Table[n+Floor[(a*n+b)^(1/2)], {n, 100}]
Table[n-1+Ceiling[(n^2-b)/a], {n, 70}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jan 09 2011
STATUS
approved