A178894 a(n) = n OR 7n, where OR is bitwise OR.

0, 7, 14, 23, 28, 39, 46, 55, 56, 63, 78, 79, 92, 95, 110, 111, 112, 119, 126, 151, 156, 151, 158, 183, 184, 191, 190, 191, 220, 223, 222, 223, 224, 231, 238, 247, 252, 295, 302, 311, 312, 319, 302, 303, 316, 319, 366, 367, 368, 375, 382, 375, 380, 375, 382

Offset: 0

Author

Dmitry Kamenetsky, Jun 21 2010

Keywords

• nonn
• look

Comments

From Robert Israel, Dec 27 2016: (Start)

7*n <= a(n) < 8*n.

a(n) = 7*n if and only if n is in A048715.

It appears that a(n) = 8*n-1 if and only if n = (4*8^j+2*8^k+3)/7 for some j and k. (End)

Links

• Robert Israel, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A048715, A163617, A178890, A178891, A178892, A178893, A178895, A178896, A178897.

Programs

Maple

seq(Bits:-Or(n,7*n), n=0..100); # Robert Israel, Dec 27 2016

Mathematica

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

Extensions

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