The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A321612 Numbers k such that all k - t are triangular numbers where t is a triangular number in range k/2 <= t < k. 0
2, 4, 6, 7, 9, 13, 16, 21, 31 (list; graph; refs; listen; history; text; internal format)
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, ..."
This sequence is analogous to A320447. Instead of the sequence of primes it uses the sequence of triangular numbers (A000217). It is conjectured that the sequence is finite and full.
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
Sequence in context: A186708 A227697 A097457 * A121865 A259983 A050095
KEYWORD
nonn,more
AUTHOR
Frank M Jackson, Dec 18 2018
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 30 01:30 EDT 2024. Contains 372954 sequences. (Running on oeis4.)