login
A329199
a(n) = round(log_3(n)).
1
0, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4
OFFSET
1,6
MATHEMATICA
Round[Log[3, Range[100]]] (* Harvey P. Dale, Sep 06 2022 *)
PROG
(PARI) apply( A329199(n)=log(n)\/log(3), [1..130])
CROSSREFS
Cf. A062153 (floor log_3), A000523 (floor log_2), A004257 (round log_2), A029837 (ceiling log_2), A329194 (log_3(n^2)).
Sequence in context: A108622 A112348 A348460 * A064601 A262303 A127321
KEYWORD
nonn
AUTHOR
M. F. Hasler, Nov 07 2019
STATUS
approved