The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A304760 Binary encoding of 1-digits in ternary representation of A254103(n). 6
 0, 1, 0, 2, 2, 3, 0, 0, 6, 4, 4, 1, 2, 7, 4, 5, 14, 3, 0, 4, 10, 0, 0, 6, 6, 12, 12, 2, 10, 8, 8, 5, 30, 4, 4, 9, 2, 15, 12, 0, 22, 11, 8, 9, 2, 11, 8, 1, 14, 19, 16, 1, 26, 3, 0, 8, 22, 3, 0, 12, 18, 8, 8, 1, 62, 3, 0, 20, 10, 16, 16, 9, 6, 28, 28, 1, 26, 7, 4, 13, 46, 20, 20, 2, 18, 16, 16, 13, 6, 20, 20, 10, 18 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,4 LINKS Antti Karttunen, Table of n, a(n) for n = 0..16384 Index entries for sequences related to binary expansion of n FORMULA a(n) = A289813(A254103(n)). PROG (PARI) A254103(n) = if(!n, n, if(!(n%2), (3*A254103(n/2))-1, (3*(1+A254103((n-1)/2)))\2)); A289813(n) = { my (d=digits(n, 3)); from digits(vector(#d, i, if (d[i]==1, 1, 0)), 2); } \\ From A289813 A304760(n) = A289813(A254103(n)); CROSSREFS Cf. A254103, A289813, A304740 (rgs-transform). Cf. also A291760. Sequence in context: A328686 A330622 A330629 * A304759 A073438 A187096 Adjacent sequences: A304757 A304758 A304759 * A304761 A304762 A304763 KEYWORD nonn,base AUTHOR Antti Karttunen, May 29 2018 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 12 10:04 EDT 2024. Contains 371627 sequences. (Running on oeis4.)