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,2

Links

Table of n, a(n) for n=0..60.

Mathematica

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

Crossrefs

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

Sequence in context: A073159 A000419 A353716 * A332933 A115821 A115767

Adjacent sequences: A178887 A178888 A178889 * A178891 A178892 A178893

Keyword

nonn

Author

Dmitry Kamenetsky, Jun 21 2010

Extensions

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

Status

approved