A072555 Smallest of four consecutive integers divisible by four consecutive primes respectively.

158, 368, 578, 788, 789, 790, 998, 1208, 1418, 1628, 1838, 1944, 2048, 2258, 2468, 2678, 2888, 3098, 3099, 3308, 3518, 3728, 3938, 4148, 4254, 4358, 4367, 4568, 4778, 4988, 5198, 5408, 5409, 5618, 5795, 5828, 6038, 6248, 6458, 6564, 6668, 6797, 6878

Offset: 1

Author

Robert G. Wilson v, Aug 06 2002

Keywords

• nonn

Examples

			158 is a term as 158, 159, 160 and 161 are divisible by 2, 3, 5 and 7 respectively.
		

Links

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

Crossrefs

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

Programs

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, 3} ]; k = 1; While[ k < l + 1 && Union[ Mod[ t, NestList[ NextPrim, p[ [ k ] ], 3 ] ] ] != {0}, k++ ]; If[ k < l + 1, Print[ n ] ], {n, 2, 7297} ]