OFFSET
1,2
COMMENTS
The sequence contains each squarefree integer k where Q(k) - 6*k/Pi^2 is smaller than Q(m) - 6*m/Pi^2 for any 0 < m < k. Where both m and k are squarefree. It is well known that Q(k) is asymptotic to 6*k/Pi^2.
EXAMPLE
Q(29) = 18 and Q(29) - 6*29/Pi^2 = 0.37011... is smaller than Q(1) - 6/Pi^2 = 0.39207...
MATHEMATICA
s = Select[Range[50000], SquareFreeQ]; d = 6*s/Pi^2 - Range[Length[s]]; s[[Flatten[Position[d, #][[1]] & /@ Union @ FoldList[Max, d]]]] (* Amiram Eldar, Jan 27 2021 *)
PROG
(PARI) lista(nn) = {my(m=oo, nb=0, x); forsquarefree(n=1, nn, nb++; x = nb - 6*n[1]/Pi^2; if (x < m, m = x; print1(n[1], ", ")); ); } \\ Michel Marcus, Jan 26 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Adedoyin M. Adegbuyi, Jan 15 2021
EXTENSIONS
More terms from Jinyuan Wang, Jan 16 2021
STATUS
approved