OFFSET
1,6
LINKS
David A. Corneth, Table of n, a(n) for n = 1..10000
David A. Corneth, PARI program
EXAMPLE
Column n lists the a(n) positive integers less than n with fewer distinct prime factors than n:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
---------------------------------------------------------------------
1 1 1 1 5 1 1 1 9 1 11 1 13 13 1 1 17 1 19
4 8 9 11 11 16 17
3 7 8 9 9 13 16
2 5 7 8 8 11 13
1 4 5 7 7 9 11
3 4 5 5 8 9
2 3 4 4 7 8
1 2 3 3 5 7
1 2 2 4 5
1 1 3 4
2 3
1 2
1
MATHEMATICA
Table[Length[Select[Range[n], PrimeNu[#]<PrimeNu[n]&]], {n, 100}]
PROG
(PARI) \\ See Corneth link
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Gus Wiseman, Dec 28 2018
STATUS
approved