A045937 Numbers n such that n through n+8 are divisible by the same number of distinct primes.
44360, 48919, 48920, 56014, 72650, 73292, 76581, 82324, 86331, 87758, 91814, 112142, 143491, 147951, 158719, 184171, 184172, 197588, 202498, 205244, 215300, 218972, 218973, 218974, 229728, 230628, 241129, 250933, 253204, 253665, 287492
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Flatten[Position[Partition[PrimeNu[Range[300000]],9,1],?(Length[ Union[ #]] == 1&),{1},Heads->False]] (* _Harvey P. Dale, May 05 2015 *)
Extensions
Offset corrected by Amiram Eldar, Oct 26 2019
Comments