%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