A066489 Binary expansion of n followed by its reverse complement.
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
Offset: 1
Examples
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
Crossrefs
Binary expansion of numbers in A035928.
Programs
-
Maple
a:= n-> (l-> parse(cat(seq(l[-i], i=1..nops(l)), 1-~l[])))(Bits[Split](n)): seq(a(n), n=1..30); # Alois P. Heinz, Oct 22 2023
-
PARI
a(n)={my(v=binary(n)); fromdigits(concat(v,vector(#v,i,1-v[#v+1-i])))} \\ Andrew Howroyd, Oct 22 2023
Extensions
Title clarified and more terms from Sean A. Irvine, Oct 22 2023