A329199 a(n) = round(log_3(n)).

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

Author

M. F. Hasler, Nov 07 2019

Keywords

• nonn

Crossrefs

Cf. A062153 (floor log_3), A000523 (floor log_2), A004257 (round log_2), A029837 (ceiling log_2), A329194 (log_3(n^2)).

Programs

Mathematica

Round[Log[3,Range[100]]] (* Harvey P. Dale, Sep 06 2022 *)

PARI

apply( A329199(n)=log(n)\/log(3), [1..130])