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,1

Comments

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

Links

Table of n, a(n) for n=1..19.

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

Crossrefs

Cf. A092419, A070040.

Sequence in context: A040999 A172240 A129901 * A323579 A124273 A038923

Adjacent sequences: A067070 A067071 A067072 * A067074 A067075 A067076

Keyword

nonn,more

Author

N. J. A. Sloane, Oct 16 2008

Extensions

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

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

Status

approved