A319824 Numbers that are not the sum of distinct lucky-indexed lucky numbers.

2, 3, 4, 5, 6, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 23, 24, 25, 26, 27, 30, 33, 34, 35, 36, 37, 40, 41, 42, 43, 44, 45, 46, 47, 48, 51, 54, 55, 58, 61, 62, 65, 66, 67, 68, 69, 72, 73, 74, 75, 76, 79, 82, 83, 86, 89, 90, 93, 96, 97, 98, 99, 100, 103

Offset

1,1

Comments

Analogous to A213356 with primes instead of lucky numbers.

Conjecture: this sequence is finite with the last term being a(98) = 373.

Links

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

Mathematica

L = Table[2*i + 1, {i, 0, 2500}]; For[n = 2, n < Length[L], r = L[[n++]]; L = ReplacePart[L, Table[r*i -> Nothing, {i, 1, Length[L]/r}]]]; a = L[[Select[L, # <= Length[L] &]]]; nn=Length[a]; t=Rest[CoefficientList[Series[Product[(1+x^(a [[k]])), {k, nn}], {x, 0, nn*nn}], x]]; Flatten[Position[t, 0]] (* after Jean-François Alcover at A000959 *)

Crossrefs

Cf. A000959, A032639, A213356, A318487.

Sequence in context: A269864 A103681 A367696 * A039265 A073599 A039204

Adjacent sequences: A319821 A319822 A319823 * A319825 A319826 A319827

Keyword

nonn

Author

Amiram Eldar, Sep 28 2018

Status

approved