A178890 a(n) = n OR 3n, where OR is bitwise OR.

0, 3, 6, 11, 12, 15, 22, 23, 24, 27, 30, 43, 44, 47, 46, 47, 48, 51, 54, 59, 60, 63, 86, 87, 88, 91, 94, 91, 92, 95, 94, 95, 96, 99, 102, 107, 108, 111, 118, 119, 120, 123, 126, 171, 172, 175, 174, 175, 176, 179, 182, 187, 188, 191, 182, 183, 184, 187, 190, 187, 188

Offset: 0

Author

Dmitry Kamenetsky, Jun 21 2010

Keywords

• nonn

Crossrefs

Cf. A163617, A178891, A178892, A178893, A178894, A178895, A178896, A178897.

Programs

Mathematica

f[n_] := BitOr[n, 3n]; Array[f, 61, 0] (* Robert G. Wilson v, Jun 28 2010 *)

Extensions

More terms from Robert G. Wilson v, Jun 28 2010