A190793 Least prime p(j) of 10 consecutive primes such that 2*p(k)+ 15015 is prime for k=j to j+9.

11161, 11171, 11173, 11177, 11197, 161561, 474937, 474941, 474949, 4005917, 4005943, 5984101, 12352877, 14821097, 18416329, 18416351, 18416371, 19622833, 28334069, 33426761, 61714043, 103887869, 212299561, 228433487, 245416663, 246522383, 317706671

Offset

1,1

Comments

15015 is the product of the first 5 odd primes.

Links

Pierre CAMI, Table of n, a(n) for n = 1..46

Example

11161 is the first p(j) of 14 consecutive primes such that 2*p(k)+15015 is prime for k=j to j+9.

Mathematica

okQ[n_] := Module[{k = 0}, While[k < 10 && PrimeQ[2*Prime[n + k] + 15015], k++]; k == 10]; Prime[Select[Range[100000], okQ]] (* T. D. Noe, May 24 2011 *)
p15015Q[n_]:=AllTrue[2#+15015&/@n, PrimeQ]; Select[Partition[Prime[ Range[ 17159000]], 10, 1], p15015Q][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 04 2021 *)

Crossrefs

Sequence in context: A250687 A342246 A001727 * A247925 A359871 A362446

Adjacent sequences: A190790 A190791 A190792 * A190794 A190795 A190796

Keyword

nonn

Author

Pierre CAMI, May 20 2011

Status

approved