OFFSET
0,1
COMMENTS
The corresponding values of k are provided in A275818.
LINKS
Hugo Pfoertner, Table of n, a(n) for n = 0..1000
Michael Weiss, On the Distribution of Rational Squares, arXiv:1510.07362 [math.NT], 2015.
Michael Weiss, Where Are the Rational Squares?, The American Mathematical Monthly, Vol. 124, No. 3 (March 2017), pp. 255-259.
EXAMPLE
a(0)=2, because 2^2*0 < 1^2 < 2^2*(0+1).
MATHEMATICA
Table[s = 1; While[Count[Range[n s^2 + 1, (n + 1) s^2 - 1], k_ /; IntegerQ@ Sqrt@ k] == 0, s++]; s, {n, 0, 120}] (* Michael De Vlieger, Aug 14 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Hugo Pfoertner, Aug 09 2016
STATUS
approved