A256756 a(n) = bitwise XOR of n and the reverse of n.

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11, 0, 25, 18, 39, 60, 45, 86, 67, 72, 22, 25, 0, 55, 50, 45, 36, 83, 78, 65, 29, 18, 55, 0, 9, 22, 27, 108, 117, 122, 44, 39, 50, 9, 0, 27, 110, 101, 100, 111, 55, 60, 45, 22, 27, 0, 121, 114, 111, 100, 58, 45, 36, 27, 110, 121

Offset

0,11

Links

Alois P. Heinz, Table of n, a(n) for n = 0..10000

Wikipedia, Bitwise operation

Formula

a(n) = A003987(n, A004086(n)).

Maple

a:= n-> Bits[Xor](n, (s-> parse(cat(s[-i]$i=1..length(s))))(""||n)):
seq(a(n), n=0..80);

Mathematica

Table[BitXor[n, FromDigits[Reverse[IntegerDigits[n]]]], {n, 0, 65}] (* Ivan N. Ianakiev, Apr 10 2015 *)

Prog

(PARI) a(n) = bitxor(n, subst(Polrev(digits(n)), x, 10)); \\ Michel Marcus, Apr 10 2015

Crossrefs

Cf. A003987, A004086, A055483, A056964, A056965, A061205, A068634, A175919, A256754, A256755.

Sequence in context: A334370 A274851 A075360 * A087558 A087555 A185682

Adjacent sequences: A256753 A256754 A256755 * A256757 A256758 A256759

Keyword

nonn,base,look,easy

Author

Alois P. Heinz, Apr 09 2015

Status

approved