OFFSET
0,3
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..5000
FORMULA
MATHEMATICA
Table[If[n==0, 0, Ceiling[Log[2, 3*n-1]]], {n, 0, 120}] (* G. C. Greubel, Mar 18 2023 *)
PROG
(Magma) [0] cat [Ceiling(Log(2, 3*n-1)): n in [1..120]]; // G. C. Greubel, Mar 18 2023
(SageMath)
def A130250(n): return 0 if (n==0) else ceil(log(3*n-1, 2))
[A130250(n) for n in range(121)] # G. C. Greubel, Mar 18 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Hieronymus Fischer, May 20 2007
STATUS
approved