login
Records in A144294.
2

%I #14 Sep 30 2024 17:52:45

%S 3,5,7,13,17,19,31,41,43,47,53,71,79,89,103,127,131,137

%N Records in A144294.

%o (PARI) f(n)=my(k=n+(sqrtint(4*n)+1)\2); forprime(p=2, , if(!issquare(Mod(k, p)), return(p))); \\ A144294

%o lista(nn) = {my(v=vector(nn, n, f(n))); my(m=0, nm=0); for (n=1, nn, nm = v[n]; if (nm > m, print1(nm, ", "); m = nm;););} \\ _Michel Marcus_, Jun 25 2021

%Y Cf. A144294, A144295.

%K nonn,more

%O 1,1

%A _N. J. A. Sloane_, Dec 03 2008

%E a(9)-a(12) from _R. J. Mathar_, Dec 04 2008

%E a(13)-a(15) from _Michel Marcus_, Jun 25 2021

%E a(16)-a(18) from _Michael S. Branicky_, Sep 30 2024