login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A185942 First of a run of 4 or more consecutive primes which all equal 1 (mod 3). 1
1741, 1747, 1753, 3049, 3301, 4591, 5101, 6361, 7351, 7369, 8311, 8707, 8713, 8887, 9067, 9091, 9103, 9631, 10639, 11287, 12577, 12823, 12829, 13267, 15187, 15583, 15817, 15889, 15901, 16363, 16369, 16561, 16729, 16981, 17041, 17419, 17431, 17839, 18199, 18211, 19213, 19219, 19471, 19477, 19483, 19489, 20071 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Subsequence of terms of A185936 such that A185936(k+1) = nextprime(A185936(k)).

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..5000

MATHEMATICA

mod3Q[l_]:=Union[Mod[#, 3]&/@l]=={1}

Transpose[Select[Partition[Prime[Range[2500]], 4, 1], mod3Q]][[1]]  (* Harvey P. Dale, Feb 16 2011 *)

PROG

(PARI) s=Mod([1, 1, 1, 1], 3); o=vector(#s); i=0; forprime(p=1, 3e4, o[i++%#o+1]=p; o-s|print1(o[(i+1)%#o+1]", "))

CROSSREFS

Cf. A185934 - A185941.

Sequence in context: A184666 A022061 A107525 * A090837 A250466 A260014

Adjacent sequences:  A185939 A185940 A185941 * A185943 A185944 A185945

KEYWORD

nonn

AUTHOR

M. F. Hasler, Feb 06 2011

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 14 21:27 EDT 2021. Contains 345041 sequences. (Running on oeis4.)