A140763 A051838 gives numbers m such that the sum of first m primes divides the product of the first m primes. This sequence gives corresponding values of the sum of first m primes.
2, 10, 77, 238, 874, 2747, 2914, 3266, 3638, 4661, 5117, 5830, 6601, 6870, 7141, 9523, 10191, 10887, 11966, 13490, 16401, 19113, 21037, 23069, 40313, 41741, 46191, 50887, 53342, 54998, 58406, 60146, 61910, 65534, 68341, 72179, 75130, 76127, 80189, 82253
Offset: 1
Keywords
Examples
a(2)=10 because when 30 is divided by 10, the quotient is 3 and integral.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Module[{nn=200,s,p},s=Accumulate[Prime[Range[nn]]];p=FoldList[ Times,Prime[ Range[nn]]];Select[Thread[{p,s}],Divisible[#[[1]],#[[2]]]&]][[All,2]] (* Harvey P. Dale, Jun 07 2022 *)
Formula
Extensions
Corrected and edited by N. J. A. Sloane, Oct 01 2011
Comments