A067073 Records in A092419.

3, 7, 13, 17, 19, 31, 37, 41, 43, 47, 53, 71, 79, 89, 103, 127, 131, 137, 151

Offset: 1

Author

N. J. A. Sloane, Oct 16 2008

Keywords

• nonn
• more

Comments

The old entry with this sequence number was a duplicate of A049236.

Crossrefs

Cf. A092419, A070040.

Programs

Maple

A000037 := proc(n) n +floor(1/2+sqrt(n)) ; end: A092419 :=proc(n) local i, k; k := A000037(n) ; for i from 1 do if numtheory[legendre](k, ithprime(i)) = -1 then RETURN(ithprime(i)); fi; od; end: rec := -1 ; for n from 1 do a := A092419(n) ; if a > rec then printf("%d,\n",a) ; rec := a; fi; od: # R. J. Mathar, Jul 13 2009

Extensions

a(8)-a(12) from R. J. Mathar, Jul 13 2009

a(13)-a(19) from Sean A. Irvine, Dec 02 2023