login
This site is supported by donations to The OEIS Foundation.

 

Logo


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: A246471 A079243 A289814 * 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 18 22:08 EDT 2019. Contains 322237 sequences. (Running on oeis4.)