|
| |
|
|
A159004
|
|
Numbers n which equal the sum of the prime factors of n^2+1217*n+370313.
|
|
0
| |
|
|
309, 311, 381, 799, 851, 3515, 3535, 8659, 10199, 10331, 30461, 32853, 40135, 43255, 202099, 453931, 504415, 1365303, 2473735, 2545039, 20506915, 27172301, 31496621, 150107891, 4180621181, 23338398423, 608602531091
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
FORMULA
| {n: A001414(n^2+1217*n+370313)=n}.
|
|
|
EXAMPLE
| For n=309, n^2+1217*n+370313= 841847=71*71*167, and 71+71+167=309.
For n=311, n^2+1217*n+370313=845521=61*83*167, and 6+83+167=311.
|
|
|
MAPLE
| A001414 := proc(n) pfs := ifactors(n)[2] ; add(op(1, p)*op(2, p), p=pfs) ; end:
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
|
|
|
CROSSREFS
| Sequence in context: A053172 A200783 A091552 * A031782 A060980 A061881
Adjacent sequences: A159001 A159002 A159003 * A159005 A159006 A159007
|
|
|
KEYWORD
| nonn,less
|
|
|
AUTHOR
| Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Jun 30 2009
|
|
|
EXTENSIONS
| Edited by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jul 26 2009
Corrected by Zak Seidov, Jul 29 2009
|
| |
|
|
