OFFSET
1,1
COMMENTS
The following is a quotation from Hage-Hassan in his paper (see Link below). "The (concept of) right and left symmetry is fundamental in physics. This incites us to ask whether this symmetry is in (the) primes. Find the numbers n with a + a' = n. a, a' are primes and {a} are all the primes with: n/2 <= a < n and n = 2,3, ..."
LINKS
Mehdi Hage-Hassan, An elementary introduction to Quantum mechanic, hal-00879586 2013 pp 58.
EXAMPLE
a(9) = 31, because the triangular numbers in the range 16 <= p < 31 are {21}. Also the complementary set {10} has all its members triangular numbers. This is the 9th occurrence of such a number.
MATHEMATICA
TriangularQ[n_] := Module[{m=0}, While[n>m(m+1)/2, m++]; If[n==m(m+1)/2, True, False]]; plst[n_] := Select[Range[Ceiling[n/2], n-1], TriangularQ]; lst={}; Do[If[plst[n]!={}&&AllTrue[n-plst[n], TriangularQ], AppendTo[lst, n]], {n, 1, 200}]; lst
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Frank M Jackson, Dec 18 2018
STATUS
approved