%I A159004
%S A159004 309,311,381,799,851,3515,3535,8659,10199,10331,30461,32853,40135,43255,
%T A159004 202099,453931,504415,1365303,2473735,2545039,20506915,27172301,31496621,
%U A159004 150107891,4180621181,23338398423,608602531091
%N A159004 Numbers n which equal the sum of the prime factors of n^2+1217*n+370313.
%F A159004 {n: A001414(n^2+1217*n+370313)=n}.
%e A159004 For n=309, n^2+1217*n+370313= 841847=71*71*167, and 71+71+167=309.
%e A159004 For n=311, n^2+1217*n+370313=845521=61*83*167, and 6+83+167=311.
%p A159004 A001414 := proc(n) pfs := ifactors(n)[2] ; add(op(1,p)*op(2,p),p=pfs) 
               ; end:
%p A159004 for n from 0 do p := n^2+1217*n+370313; if A001414(p) = n then printf("%d,
               \n",n) ; fi; od: # R. J. Mathar, Jul 26 2009
%Y A159004 Sequence in context: A118843 A053172 A091552 this_sequence A031782 A060980 
               A061881
%Y A159004 Adjacent sequences: A159001 A159002 A159003 this_sequence A159005 A159006 
               A159007
%K A159004 nonn,less
%O A159004 1,1
%A A159004 Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Jun 30 2009
%E A159004 Edited by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jul 26 2009
%E A159004 Corrected by Zak Seidov, Jul 29 2009