A133108 Representation of a dense para-sequence.

1, 2, 3, 4, 1, 5, 6, 2, 7, 8, 9, 10, 3, 11, 12, 4, 13, 14, 1, 15, 16, 5, 17, 18, 6, 19, 20, 2, 21, 22, 7, 23, 24, 8, 25, 26, 27, 28, 9, 29, 30, 10, 31, 32, 3, 33, 34, 11, 35, 36, 12, 37, 38, 4, 39, 40, 13, 41, 42, 14, 43, 44, 1, 45, 46, 15, 47, 48, 16, 49, 50, 5, 51, 52, 17, 53, 54, 18

Offset

1,2

Comments

(1) A fractal sequence. (2) The para-sequence may be regarded as a sort of "limit" of the concatenated segments. The para-sequence (itself not a sequence) is dense in the sense that every pair of terms i and j are separated by another term (and hence separated by infinitely many terms. (3) The para-sequence accounts for positions of triadic rational numbers in the following way: 1/3 < 2/3 matches the segment 1,2; 1/9 < 2/9 < 1/3 < 4/9 < 5/9 < 2/3 < 7/9 < 8/9 matches the segment 3,4,1,5,6,2,7,8, etc.

References

C. Kimberling, Proper self-containing sequences, fractal sequences and para-sequences, preprint, 2007.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Clark Kimberling, Self-Containing Sequences, Selection Functions, and Parasequences, J. Int. Seq. Vol. 25 (2022), Article 22.2.1.

Example

The first segment is 1,2; the 2nd is 3,4,1,5,6,2,7,8; the 4th begins with 27,28,9 and ends with 26,79,80.

Mathematica

Flatten@NestList[Riffle[Range[Length[#] + 1, 3 Length[#] + 2], #, 3] &, {1, 2}, 3] (* Birkas Gyorgy, Mar 11 2011 *)

Crossrefs

Cf. A131987.

Sequence in context: A129709 A253146 A253028 * A055441 A104717 A067003

Adjacent sequences: A133105 A133106 A133107 * A133109 A133110 A133111

Keyword

nonn

Author

Clark Kimberling, Sep 12 2007

Status

approved