The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A356081 Numbers k such that A356052(k) = A356056(k). 2
 1, 3, 4, 6, 8, 14, 16, 17, 22, 25, 27, 28, 30, 38, 40, 67, 68, 74, 78, 82, 102, 104, 109, 110, 112, 126, 128, 132, 136, 140, 160, 164, 188 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Conjectures: (1) This sequence is finite, with greatest term 188. (2) The set {A356056(k) - A356052(k)}, for k >=1, contains every integer >= -5. LINKS Table of n, a(n) for n=1..33. MATHEMATICA z = 1000000; u = Table[Floor[n (Sqrt[2])], {n, 1, z}]; (* A001951 *) u1 = Complement[Range[Max[u]], u]; (* A001952 *) v = Table[Floor[n (1/2 + Sqrt[2])], {n, 1, z}]; (* A137803 *) v1 = Complement[Range[Max[v]], v]; (* A137804 *) t1 = Intersection[u, v]; (* A356052 *) t2 = Table[u[[v[[n]]]], {n, 1, z/2}]; (* A356056 *) length = Min[Length[t1], Length[t2]] t = Take[t2, length] - Take[t1, length]; {Min[t], Max[t]} Flatten[Position[t, 0]] CROSSREFS Cf. A001951, A137803, A137803, A137804, A356052, A356056. Sequence in context: A136483 A240494 A280250 * A004713 A050475 A340770 Adjacent sequences: A356078 A356079 A356080 * A356082 A356083 A356084 KEYWORD nonn,fini AUTHOR Clark Kimberling, Jul 26 2022 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.

Last modified August 13 02:28 EDT 2024. Contains 375113 sequences. (Running on oeis4.)