A045936 Numbers n such that n through n+7 are divisible by the same number of distinct primes.

141, 212, 39693, 44360, 44361, 48919, 48920, 48921, 54349, 56014, 56015, 56791, 60044, 65721, 72650, 72651, 73292, 73293, 76581, 76582, 82324, 82325, 86331, 86332, 87758, 87759, 90092, 91814, 91815, 99843, 106249, 112142, 112143, 121594

Offset: 1

Author

David W. Wilson

Keywords

• nonn

Links

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

Crossrefs

Cf. A001221, A006049, A006073, A045932-A045935, A045937-A045938.

Programs

Mathematica

npQ[n_]:=Length[Union[Length[FactorInteger[#]]&/@Range[n,n+7]]]==1
Select[Range[125000],npQ]  (* Harvey P. Dale, Feb 23 2011 *)

Extensions

Offset corrected by Amiram Eldar, Oct 26 2019