|
%I #14 Nov 01 2019 16:22:37
%S 2,2,3,2,5,3,7,2,3,5,11,3,13,7,5,2,17,3,19,5,7,11,23,3,5,13,3,7,29,5,
%T 31,2,11,17,7,3,37,19,13,5,41,7,43,11,5,23,47,3,7,5,17,13,53,3,11,7,
%U 19,29,59,5,61,31,7,2,13,11,67,17,23,7,71,3,73,37,5,19,11,13,79,5,3,41,83,7
%N Largest prime factor of 2n.
%C For composite indices we have a(n*m) = max(a(n), a(m)). - _Stefan Steinerberger_, Nov 13 2005
%C Same as A006530 except for initial term. - _Franklin T. Adams-Watters_, Jul 17 2008
%t Table[FactorInteger[2n][[ -1, 1]], {n, 100}] (* _Ray Chandler_, Nov 12 2005 *)
%Y Bisection of A006530.
%K nonn
%O 1,1
%A _Giovanni Teofilatto_, Nov 12 2005
%E Corrected and extended by _Ray Chandler_ and _Stefan Steinerberger_, Nov 12 2005
|
