cp's OEIS Frontend

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

%I A318514 #6 Aug 28 2018 15:59:06
%S A318514 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,
%T A318514 31,27,30,29,31,31,48,43,51,39,54,37,55,47,60,41,63,43,62,47,63,47,56,
%U A318514 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
%N A318514 a(n) = n OR (greatest proper divisor of n).
%H A318514 Antti Karttunen, <a href="/A318514/b318514.txt">Table of n, a(n) for n = 1..65537</a>
%H A318514 <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a>
%F A318514 a(n) = A003986(n, A032742(n)).
%F A318514 a(n) = n + A032742(n) - A318515(n).
%o A318514 (PARI)
%o A318514 A032742(n) = if(1==n,n,n/vecmin(factor(n)[,1]));
%o A318514 A318514(n) = bitor(n,A032742(n));
%Y A318514 Cf. A003986, A032742, A106409, A318506, A318515, A318516.
%K A318514 nonn,base
%O A318514 1,2
%A A318514 _Antti Karttunen_, Aug 28 2018