|
|
A066489
|
|
Binary expansion of n followed by its reverse complement.
|
|
0
|
|
|
10, 1010, 1100, 100110, 101010, 110100, 111000, 10001110, 10010110, 10101010, 10110010, 11001100, 11010100, 11101000, 11110000, 1000011110, 1000101110, 1001010110, 1001100110, 1010011010, 1010101010, 1011010010, 1011100010, 1100011100, 1100101100, 1101010100
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(2) = 1010 because 2 in binary is 10, the complement of which is 01, the reverse of which is 10, hence (10)(10). - Sean A. Irvine, Oct 22 2023
|
|
MAPLE
|
a:= n-> (l-> parse(cat(seq(l[-i], i=1..nops(l)), 1-~l[])))(Bits[Split](n)):
|
|
PROG
|
(PARI) a(n)={my(v=binary(n)); fromdigits(concat(v, vector(#v, i, 1-v[#v+1-i])))} \\ Andrew Howroyd, Oct 22 2023
|
|
CROSSREFS
|
Binary expansion of numbers in A035928.
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|