proposed
approved
proposed
approved
editing
proposed
editing
proposed
Víctor Martín Chabrera, <a href="https://upcommons.upc.edu/handle/2117/133344">An algebraic fractal approach to Collatz Conjecture</a>, Bachelor tesis, Universitat Politècnica de Catalunya (Barcelona, 2019), see lemma 6.1 with a(n) = r(A005836(n)).
a(n) = Sum_{i=0..k} 2^e[i] * 3^i where binary expansion n = 2^e[0] + 2^e[1] + ... + 2^e[k] with descending e[0] > e[1] > ... > e[k] (A272011). [Martín Chabrera lemma 6.1, adapting index i] - Kevin Ryde, Oct 22 2021
(PARI) a(n) = my(ret=0); if(n, for(i=0, logint(n, 2), if(bittest(n, i), ret=3*ret+1<<i))); ret; \\ Kevin Ryde, Oct 22 2021
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
def a(n): return 0 if n==0 else 2*a((n - 1)//2) + 3**bin((n - 1)//2).count('1') if n%2==1 else 2*a(n//2)
print map([a, (n) for n in range(131)]) # Indranil Ghosh, Aug 13 2017
approved
editing
proposed
approved