A072760 Smallest of 7 consecutive integers divisible respectively by 7 consecutive primes.

210998, 466254, 721508, 1232018, 1742528, 2253038, 2763548, 3274058, 3784568, 4295078, 4805588, 5316098, 5316099, 5826608, 6337118, 6847628, 7358138, 7868648, 8379158, 8889668, 9400178, 9910688, 10165944, 10421198, 10931708

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Example

210998 is a term as 210998, 210999, 211000, 211001, 211002, 211003 and 211004 are divisible by 2, 3, 5, 7, 11, 13 and 17 respectively.

Mathematica

f[n_Integer] := Flatten[ Table[ #1] & @@@ FactorInteger[n]]; NextPrim[n_] := Block[ {k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; Do[ p = f[ n ]; l = Length[ p ]; t = Table[n + i, {i, 0, 6} ]; k = 1; While[ k < l + 1 && Union[ Mod[ t, NestList[ NextPrim, p[[ k ]], 6 ]]] != {0}, k++ ]; If[ k < l + 1, Print[ n ]], {n, 2, 811597} ]

Crossrefs

Cf. A073606, A073607, A072555, A073754, A073755, A072562.

Sequence in context: A015376 A216593 A172825 * A178421 A069175 A340158

Adjacent sequences: A072757 A072758 A072759 * A072761 A072762 A072763

Keyword

nonn

Author

Robert G. Wilson v, Aug 08 2002

Status

approved