OFFSET
1,1
COMMENTS
This sequence gives the values of the counting function U(x), whose values are given in table 2 on page 359 of Shiu, 1986.
LINKS
P. Shiu, Counting sums of two squares: the Meissel-Lehmer method, Mathematics of Computation, 47 (1986), 351-360.
MATHEMATICA
Table[Count[Range[1, 10^n, 2], k_ /; SquareFreeQ@ k && SquaresR[2, k] > 0], {n, 6}] (* Michael De Vlieger, Aug 04 2016 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Felix Fröhlich, Aug 04 2016
EXTENSIONS
a(7), a(11) and a(12) corrected and a(13)-a(16) added by Hiroaki Yamanouchi, Dec 25 2016
STATUS
approved