This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A072555 #7 Mar 23 2021 05:20:37
%S A072555 158,368,578,788,789,790,998,1208,1418,1628,1838,1944,2048,2258,2468,
%T A072555 2678,2888,3098,3099,3308,3518,3728,3938,4148,4254,4358,4367,4568,
%U A072555 4778,4988,5198,5408,5409,5618,5795,5828,6038,6248,6458,6564,6668,6797,6878
%N A072555 Smallest of four consecutive integers divisible by four consecutive primes respectively.
%H A072555 Amiram Eldar, <a href="/A072555/b072555.txt">Table of n, a(n) for n = 1..10000</a>
%e A072555 158 is a term as 158, 159, 160 and 161 are divisible by 2, 3, 5 and 7 respectively.
%t A072555 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} ]
%Y A072555 Cf. A073606, A073607, A073754, A073755, A073756, A072562.
%K A072555 nonn
%O A072555 1,1
%A A072555 _Robert G. Wilson v_, Aug 06 2002