A067394 Number of distinct prime factors in floor((3/2)^n).

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

Links

Table of n, a(n) for n=1..105.

Mathematica

PrimeNu[Floor[(3/2)^Range[110]]] (* Harvey P. Dale, Aug 26 2020 *)

Crossrefs

Sequence in context: A103380 A309120 A098708 * A337301 A076925 A100961

Adjacent sequences: A067391 A067392 A067393 * A067395 A067396 A067397

Keyword

easy,nonn

Author

Benoit Cloitre, Feb 23 2002

Status

approved