login
A121756
Primes p such that sum of first p primes divides product of first p primes.
1
3, 13, 23, 41, 43, 53, 73, 149, 151, 157, 167, 191, 229, 269, 293, 373, 521, 557, 569, 607, 691, 701, 829, 853, 863, 887, 947, 991, 1019, 1033, 1039, 1051, 1087, 1091, 1303, 1321, 1367, 1429, 1483, 1493, 1543, 1667, 1697, 1709, 1723, 1733, 1777, 1811, 1831
OFFSET
1,1
COMMENTS
All a(n) belong to A051838[n] = {1,3,8,13,23,38,39,41,43,48,50,53,56,57,...} Sum of first n primes divides product of first n primes.
MATHEMATICA
Select[Prime[Range[300]], IntegerQ[Product[Prime[k], {k, 1, #1}]/Sum[Prime[k], {k, 1, #1}]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Alexander Adamchuk, Aug 19 2006
STATUS
approved