login
A254046
Column index of n in A191450: a(3n) = 1, a(3n+1) = 1, a(3n+2) = 1 + a(n+1).
12
1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 4, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 5, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 4, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 4, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 1, 1, 6, 1, 1, 2, 1, 1, 2
OFFSET
1,2
COMMENTS
Equally, the row index of n in A254051.
a(n) is the 3-adic valuation of A087289(n-1). - Fred Daniel Kline, Jan 11 2017
LINKS
FORMULA
a(3n) = 1, a(3n+1) = 1, a(3n+2) = 1 + a(n+1).
a(n) = A253786(n) + 1.
a(n) = A253786(3n-1). - Cyril Damamme, Aug 04 2015
a(n) = A051064(2n-1), i.e., the 3-adic valuation of 6n-3. - Cyril Damamme, Aug 04 2015
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 3/2. - Amiram Eldar, Nov 16 2023
MATHEMATICA
With[{nmax=200}, IntegerExponent[6Range[nmax]-3, 3]] (* Paolo Xausa, Nov 10 2023 *)
PROG
(Scheme, with memoization-macro definec)
(definec (A254046 n) (if (= 2 (modulo n 3)) (+ 1 (A254046 (/ (+ 1 n) 3))) 1))
CROSSREFS
One more than A253786.
Cf. A253887 (the corresponding row index).
Odd bisection of A051064.
Sequence in context: A098824 A181651 A124032 * A137457 A275699 A305633
KEYWORD
nonn,easy
AUTHOR
Antti Karttunen, Jan 24 2015
STATUS
approved