%I #6 Aug 08 2013 10:16:09
%S 2,3,4,4,6,7,8,6,6,11,12,8,14,15,16,10,18,9,20,12,22,23,24,10,10,27,
%T 12,16,30,31,32,18,34,35,36,12,38,39,40,14,42,43,44,24,18,47,48,14,14,
%U 15,52,28,54,15,56,18,58,59,60,32,62,63,24,34,66,67,68,36,70,71,72,18,74
%N Rad(n)+n/rad(n), where rad(n) is the squarefree kernel of n = A007947(n).
%H Charles R Greathouse IV, <a href="/A076332/b076332.txt">Table of n, a(n) for n = 1..10000</a>
%o (PARI) rad(n)=my(f=factor(n)[,1]);prod(i=1,#f,f[i])
%o a(n)=my(r=rad(n));r+n/r \\ _Charles R Greathouse IV_, Aug 08 2013
%Y a(n)=A007947(n)+A003557(n).
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Nov 06 2002