A121756 Primes p such that sum of first p primes divides product of first p primes.

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.

Links

Table of n, a(n) for n=1..49.

Mathematica

Select[Prime[Range[300]], IntegerQ[Product[Prime[k], {k, 1, #1}]/Sum[Prime[k], {k, 1, #1}]]&]

Crossrefs

Cf. A121755, A051838, A007504, A002110.

Sequence in context: A017305 A367296 A018709 * A178825 A147473 A030431

Adjacent sequences: A121753 A121754 A121755 * A121757 A121758 A121759

Keyword

nonn

Author

Alexander Adamchuk, Aug 19 2006

Status

approved