|
%I #10 Jan 08 2019 09:12:41
%S 2,22,23,85,2198,83048,422151,2508952,6635624,199148648,24591257752,
%T 39660184000219160,262537412640768744,14468071444687145223825854225,
%U 75579535015741588088534584527,101634035376709910404057715634
%N Numbers n such that (log(n)/Pi)^2 is closer to its nearest integer than any value of (log(k)/Pi)^2 for 1 <= k < n.
%C (log(2198)/Pi)^2 = 6.0000064777...
%o (PARI) print1("2,22,");k=vector(2);d=1;for(n=1,500,k[1]=floor(exp(sqrt(n)*Pi)); k[2]=k[1]+1;for(i=1,2,s=(log(k[i])/Pi)^2;s=abs(s-round(s)); if(s<d,d=s;print1(k[i],",")))) \\ _Robert Gerbicz_, Aug 24 2006
%Y Cf. A079490, A080052, A080279-A080282.
%K nonn
%O 1,1
%A Mark Hudson (mrmarkhudson(AT)hotmail.com), Feb 13 2003
%E More terms from _Michel ten Voorde_ Jun 20 2003
%E Further terms from _Robert Gerbicz_, Aug 24 2006
|
