A046280 -id:A046280 - cp's OEIS frontend

A046281 Prime numbers that are the sum of the first k lucky numbers, A046279(k), for some k.

11, 401, 1259, 2039, 3041, 7349, 7949, 19249, 22397, 26981, 51487, 70177, 91757, 98909, 103801, 153529, 289559, 307067, 316031, 434113, 439441, 518159, 529987, 535937, 547957, 560113, 578603, 591067, 597353, 655601, 745141, 795937, 886819

Offset: 1

Patrick De Geest, Jun 15 1998

nonn

See A046280 for the values of k.

Amiram Eldar, Table of n, a(n) for n = 1..10000

Cf. A000959, A013918, A046279, A046280.

a(n) = A046279(A046280(n)). - Amiram Eldar, Nov 16 2019

Offset corrected by Amiram Eldar, Nov 16 2019

A046285 Numbers k such that the sum of the first k primes is a lucky number.

Original entry on oeis.org

10, 20, 34, 36, 46, 52, 56, 68, 72, 86, 88, 90, 96, 100, 102, 118, 130, 140, 144, 154, 166, 198, 228, 240, 242, 282, 318, 328, 348, 356, 360, 366, 392, 402, 418, 440, 452, 464, 472, 476, 510, 540, 556, 570, 572, 586, 592, 600, 604, 614, 638, 650, 654, 670, 684

Offset: 1

Patrick De Geest, Jun 15 1998

nonn

Amiram Eldar, Table of n, a(n) for n = 1..730

Cf. A000959, A007504, A046280.

lst = Range[1, 1700000, 2]; i = 2; While[ i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++ ]; lst2 = {}; s = 0; Do[s = s + Prime@n; If[MemberQ[lst, s], Print[n]; AppendTo[lst2, n]], {n, 687}]; lst2 (* Robert G. Wilson v *)

More terms from Robert G. Wilson v, May 12 2006

cp's OEIS Frontend

A046281 Prime numbers that are the sum of the first k lucky numbers, A046279(k), for some k.

Views

Author

Keywords

Comments

Links

Crossrefs

Formula

Extensions