login
Square of the sum of the prime factors of n (with repetition).
5

%I #7 Aug 11 2014 22:45:22

%S 0,4,9,16,25,25,49,36,36,49,121,49,169,81,64,64,289,64,361,81,100,169,

%T 529,81,100,225,81,121,841,100,961,100,196,361,144,100,1369,441,256,

%U 121,1681,144,1849,225,121,625,2209,121,196,144,400,289,2809,121,256

%N Square of the sum of the prime factors of n (with repetition).

%H Harvey P. Dale, <a href="/A074373/b074373.txt">Table of n, a(n) for n = 1..1000</a>

%H Neville Holmes, <a href="http://www.comp.utas.edu.au/users/nholmes/sqncs/cmbntns.htm#A074373">Integer Sequence Combinations</a>

%e a(12)=49 because 12=2*2*3, 2+2+3=7 and 7^2 = 49.

%t sspf[n_]:=Total[Flatten[Table[#[[1]],{#[[2]]}]&/@FactorInteger[ n]]]^2; Join[{0},Array[sspf,60,2]] (* _Harvey P. Dale_, Sep 24 2012 *)

%Y Equals A001414^2.

%K easy,nonn

%O 1,2

%A _W. Neville Holmes_, Aug 28 2002