[go: up one dir, main page]

login
A318514
a(n) = n OR (greatest proper divisor of n).
3
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
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
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Aug 28 2018
STATUS
approved