A379472 Composition of Blue code and bijective bit-reverse, in this order: a(n) = A057889(A193231(n)).

0, 1, 3, 2, 5, 4, 6, 7, 15, 14, 12, 11, 10, 13, 9, 8, 17, 16, 18, 25, 20, 21, 29, 26, 30, 31, 23, 28, 27, 22, 24, 19, 51, 38, 48, 35, 54, 59, 43, 44, 60, 47, 63, 62, 39, 56, 46, 55, 34, 49, 33, 32, 57, 50, 36, 41, 45, 52, 58, 61, 40, 37, 53, 42, 85, 84, 106, 117, 80, 69, 101, 74, 90, 109, 77, 104, 125, 122, 116, 93

Offset

0,3

Links

Antti Karttunen, Table of n, a(n) for n = 0..16383

Index entries for sequences related to binary expansion of n

Index entries for sequences related to polynomials in ring GF(2)[X]

Index entries for sequences that are permutations of the natural numbers

Prog

(PARI)
A030101(n) = if(n<1, 0, subst(Polrev(binary(n)), x, 2));
A057889(n) = if(!n, n, A030101(n/(2^valuation(n, 2))) * (2^valuation(n, 2)));
A193231(n) = { my(x='x); subst(lift(Mod(1, 2)*subst(Pol(binary(n), x), x, 1+x)), x, 2) };
A379472(n) = A057889(A193231(n));

Crossrefs

Cf. A057889, A193231, A379471 (inverse permutation).

Sequence in context: A371976 A340478 A340402 * A379471 A193231 A191672

Adjacent sequences: A379469 A379470 A379471 * A379473 A379474 A379475

Keyword

nonn,easy,base

Author

Antti Karttunen, Dec 25 2024

Status

approved