A178731 a(n) = n XOR 5n, where XOR is bitwise XOR.

0, 4, 8, 12, 16, 28, 24, 36, 32, 36, 56, 60, 48, 76, 72, 68, 64, 68, 72, 76, 112, 124, 120, 100, 96, 100, 152, 156, 144, 140, 136, 132, 128, 132, 136, 140, 144, 156, 152, 228, 224, 228, 248, 252, 240, 204, 200, 196, 192, 196, 200, 204, 304, 316, 312, 292, 288, 292

Offset: 0

Author

Dmitry Kamenetsky, Jun 08 2010

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..5000

Crossrefs

Cf. A048724, A178729, A048725, A178732, A178733, A178734, A178735, A178736. - Robert G. Wilson v, Jun 09 2010

Programs

Magma

[BitwiseXor(n, 5*n): n in [0..70]]; // Vincenzo Librandi, Jul 11 2017

Mathematica

f[n_] := BitXor[n, 5 n]; Array[f, 60, 0] (* Robert G. Wilson v, Jun 09 2010 *)

PARI

a(n) = bitxor(n, 5*n); \\ Michel Marcus, Jul 11 2017

Extensions

a(30) onwards from Robert G. Wilson v, Jun 09 2010