Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A067394
Number of distinct prime factors in floor((3/2)^n).
0
0, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 1, 1, 3, 3, 3, 3, 3, 2, 4, 4, 2, 2, 2, 3, 2, 4, 5, 4, 3, 4, 5, 4, 4, 5, 3, 2, 2, 2, 4, 5, 5, 4, 4, 4, 3, 5, 3, 2, 2, 5, 3, 2, 2, 3, 2, 5, 2, 3, 2, 4, 4, 6, 7, 6, 4, 3, 4, 5, 5, 6, 6, 3, 2, 2, 3, 4, 5, 2, 2, 4, 5, 6, 5, 4, 2, 2, 3, 1, 3, 2, 5, 6, 6, 5, 3
OFFSET
1,9
MATHEMATICA
PrimeNu[Floor[(3/2)^Range[110]]] (* Harvey P. Dale, Aug 26 2020 *)
CROSSREFS
Sequence in context: A103380 A309120 A098708 * A337301 A076925 A100961
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Feb 23 2002
STATUS
approved