A276069 Zero terms of A276034.

1, 2, 16, 26, 64, 97, 107, 122, 146, 167, 194, 391, 451, 496, 707, 856, 958

Offset

1,2

Comments

It is conjectured that this sequence is finite and all terms are found.

Links

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

Example

A276034(1)=0, so a(1)=1;
A276034(2)=0, so a(2)=2;
next,
A276034(16)=0, so a(3)=16.

Mathematica

p = 3; sp = {p}; k = 0; Table[While[k++; m = 2*k; l = Length[sp]; While[sp[[l]] < m, While[p = NextPrime[p]; cp = 2*3^(Floor[Log[3, 2*p - 1]]) - p; ! PrimeQ[cp]]; AppendTo[sp, p]; l++]; ct = 0; Do[If[(2*sp[[i]] <= m) && (MemberQ[sp, m - sp[[i]]]), ct++], {i, 1, l}]; ct > 0]; k, {n, 1, 17}]

Crossrefs

Cf. A276034.

Sequence in context: A019317 A355714 A344989 * A190046 A067566 A067555

Adjacent sequences: A276066 A276067 A276068 * A276070 A276071 A276072

Keyword

nonn,easy,fini,full

Author

Lei Zhou, Nov 15 2016

Status

approved