A100421 Numbers n such that 30*n+{1,7,11,13,19,23,29} are all prime.

2, 79, 391701, 505017, 740413, 787187, 933025, 1169863, 1333719, 1406792, 2212261, 2719950, 2962738, 3125992, 3284955, 3384586, 3727271, 3821295, 3861881, 4320864, 4439878, 4764356, 5014865, 5480190, 5879274, 6124442

Offset

1,1

Comments

Values are 2 mod 7.

In each case, the 7 primes are necessarily consecutive. See the comment in A100418. - Peter Munn, Sep 06 2023

Links

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

Mathematica

Select[Range[7*10^6], AllTrue[30#+{1, 7, 11, 13, 19, 23, 29}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, May 16 2016 *)

Prog

(Magma) [ n: n in [2..70000000 by 7] | forall{ q: q in [1, 7, 11, 13, 19, 23, 29] | IsPrime(30*n+q) } ]; // Klaus Brockhaus, Feb 24 2011

Crossrefs

Cf. A005776, A007775, A076205, A100418-A100420, A100422, A100423.

Sequence in context: A113152 A265585 A060051 * A319438 A371151 A195000

Adjacent sequences: A100418 A100419 A100420 * A100422 A100423 A100424

Keyword

easy,nonn

Author

Ferenc Adorjan (fadorjan(AT)freemail.hu), Nov 19 2004

Extensions

Edited by Don Reble, Nov 17 2005

Status

approved