A318514 a(n) = n OR (greatest proper divisor of n).

1, 3, 3, 6, 5, 7, 7, 12, 11, 15, 11, 14, 13, 15, 15, 24, 17, 27, 19, 30, 23, 31, 23, 28, 29, 31, 27, 30, 29, 31, 31, 48, 43, 51, 39, 54, 37, 55, 47, 60, 41, 63, 43, 62, 47, 63, 47, 56, 55, 59, 51, 62, 53, 63, 63, 60, 59, 63, 59, 62, 61, 63, 63, 96, 77, 99, 67, 102, 87, 103, 71, 108, 73, 111, 91, 110, 79, 111, 79, 120, 91, 123, 83, 126

Offset

1,2

Links

Antti Karttunen, Table of n, a(n) for n = 1..65537

Index entries for sequences related to binary expansion of n

Formula

a(n) = A003986(n, A032742(n)).

a(n) = n + A032742(n) - A318515(n).

Prog

(PARI)
A032742(n) = if(1==n, n, n/vecmin(factor(n)[, 1]));
A318514(n) = bitor(n, A032742(n));

Crossrefs

Cf. A003986, A032742, A106409, A318506, A318515, A318516.

Sequence in context: A180681 A286102 A023822 * A355413 A369857 A071047

Adjacent sequences: A318511 A318512 A318513 * A318515 A318516 A318517

Keyword

nonn,base

Author

Antti Karttunen, Aug 28 2018

Status

approved