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

Author

Antti Karttunen, Dec 25 2024

Keywords

• nonn
• easy
• base

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

Crossrefs

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

Programs

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));