%I A130065
%S A130065 1,2,3,4,5,4,7,8,9,4,11,8,13,4,9,16,17,12,19,8,9,4,23,16,25,4,27,8,29,
%T A130065 12,31,32,9,4,25,24,37,4,9,16,41,12,43,8,27,4,47,32,49,20,9,8,53,36,25,
%U A130065 16,9,4,59,24,61,4,27,64,25,12,67,8,9,20,71,48,73,4,45,8,49,12,79,32,81
%N A130065 (n / GreatestPrimeFactor(n)) * SmallestPrimeFactor(n).
%C A130065 a(n) = n*A020639(n)/A006530(n) = A052126(n)*A020639(n);
%C A130065 a(n)<=n; a(n)=n iff n is a prime power: a(A000961(n))=A000961(n);
%C A130065 a(A001221(n)) <= A001221(n); a(A001222(n)) = A001222(n);
%C A130065 a(n) = A130064(n)-n*A046665(n)*A074320(n)/A066048(n) = A000290(n)/A130064(n).
%H A130065 R. Zumkeller, <a href="b130065.txt">Table of n, a(n) for n = 1..10000</
               a>
%Y A130065 Sequence in context: A111610 A119816 A068794 this_sequence A079881 A058084 
               A074882
%Y A130065 Adjacent sequences: A130062 A130063 A130064 this_sequence A130066 A130067 
               A130068
%K A130065 nonn
%O A130065 1,2
%A A130065 Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), May 05 2007