login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A057632
Initial prime in first sequence of n primes congruent to 3 modulo 8.
1
3, 491, 2243, 42299, 274123, 4310083, 4310083, 9065867, 547580443, 1885434347, 8674616939, 11312238283, 19201563659, 619849118491, 4056100954547, 13721202685691, 119254168189363, 276151474703651, 2189798979924331, 3153425741761723
OFFSET
1,1
EXAMPLE
a(3) = 2243 because this number is the first in a sequence of 3 consecutive primes all of the form 8n + 3.
MATHEMATICA
NextPrime[ n_Integer ] := Module[ {k = n + 1}, While[ ! PrimeQ[ k ], k++ ]; Return[ k ] ]; PrevPrime[ n_Integer ] := Module[ {k = n - 1}, While[ ! PrimeQ[ k ], k-- ]; Return[ k ] ]; p = 0; Do[ a = Table[ -1, {n} ]; k = Max[ 1, p ]; While[ Union[ a ] != {3}, k = NextPrime[ k ]; a = Take[ AppendTo[ a, Mod[ k, 8 ] ], -n ] ]; p = NestList[ PrevPrime, k, n ]; Print[ p[ [ -2 ] ] ]; p = p[ [ -1 ] ], {n, 1, 9} ] a(9) > 305256000.
CROSSREFS
Cf. A363017 (indices), A057624 (with 1 modulo 4).
Sequence in context: A198652 A198659 A142801 * A245245 A024045 A334304
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Oct 10 2000
EXTENSIONS
More terms from Jens Kruse Andersen, May 28 2006
a(16)-a(18) from Giovanni Resta, Aug 04 2013
a(19)-a(20) from Martin Ehrenstein, May 28 2023
STATUS
approved