A162598 -id:A162598 - cp's OEIS frontend

A080677 a(n) = n + 1 - A004001(n).

1, 2, 2, 3, 3, 3, 4, 5, 5, 5, 5, 6, 6, 7, 8, 9, 9, 9, 9, 9, 10, 10, 10, 11, 11, 12, 13, 13, 14, 15, 16, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 19, 19, 19, 20, 20, 21, 22, 22, 22, 23, 23, 24, 25, 25, 26, 27, 28, 28, 29, 30, 31, 32, 33, 33, 33, 33, 33, 33, 33, 34, 34, 34, 34, 34, 35, 35, 35

Offset: 1

N. J. A. Sloane, Mar 03 2003

nonn

From Antti Karttunen, Jan 10 2016: (Start)
This is the sequence b(n) mentioned on page 229 (page 5 of PDF) in Kubo & Vakil paper, but using starting offset 1 instead of 2.
The recursive sum formula for A004001, a(n) = a(a(n-1)) + a(n-a(n-1)) can be written also as a(n) = a(a(n-1)) + a(A080677(n-1)).
This is the least monotonic left inverse for sequence A087686. Proof: Taking the first differences of this sequence yields the characteristic function for the complement of A188163, because A188163 gives the positions where A004001 increases, and this sequence increases by one whenever A004001 does not increase (and vice versa). Sequence A188163 is also 1 followed by A088359 (see comment in former), whose complement A087686 is, thus A087686 is also the complement of A188163, apart from the initial one. Note also how A087686 is closed with respect to A004001 (see A266188).
(End)

J. Arkin, D. C. Arney, L. S. Dewald and W. E. Ebel, Jr., Families of recursive sequences, J. Rec. Math., 22 (No. 22, 1990), 85-94.

Antti Karttunen, Table of n, a(n) for n = 1..8192
T. Kubo and R. Vakil, On Conway's recursive sequence, Discr. Math. 152 (1996), 225-252.
Index entries for Hofstadter-type sequences

Cf. A004001, A087686, A088359, A162598, A188163, A265332, A266188, A267111.

(define (A080677 n) (- (+ 1 n) (A004001 n))) ;; Scheme code for A004001 given in that entry. - Antti Karttunen, Jan 10 2016

a(n) = n + 1 - A004001(n).
Other identities. For all n >= 1:
a(A087686(n)) = n. [See comments.] - Antti Karttunen, Jan 10 2016

A265903 Square array read by descending antidiagonals: A(1,k) = A188163(k), and for n > 1, A(n,k) = A087686(1+A(n-1,k)).

Original entry on oeis.org

1, 3, 2, 5, 7, 4, 6, 12, 15, 8, 9, 14, 27, 31, 16, 10, 21, 30, 58, 63, 32, 11, 24, 48, 62, 121, 127, 64, 13, 26, 54, 106, 126, 248, 255, 128, 17, 29, 57, 116, 227, 254, 503, 511, 256, 18, 38, 61, 120, 242, 475, 510, 1014, 1023, 512, 19, 42, 86, 125, 247, 496, 978, 1022, 2037, 2047, 1024, 20, 45, 96, 192, 253, 502, 1006, 1992, 2046, 4084, 4095, 2048

Offset: 1

Antti Karttunen, Dec 18 2015

Square array A(n,k) [where n is row and k is column] is read by descending antidiagonals: A(1,1), A(1,2), A(2,1), A(1,3), A(2,2), A(3,1), etc.

For n >= 3, each row n lists the numbers that appear n times in A004001. See also A051135.

			The top left corner of the array:
     1,    3,    5,    6,     9,    10,    11,    13,    17,    18,    19
     2,    7,   12,   14,    21,    24,    26,    29,    38,    42,    45
     4,   15,   27,   30,    48,    54,    57,    61,    86,    96,   102
     8,   31,   58,   62,   106,   116,   120,   125,   192,   212,   222
    16,   63,  121,  126,   227,   242,   247,   253,   419,   454,   469
    32,  127,  248,  254,   475,   496,   502,   509,   894,   950,   971
    64,  255,  503,  510,   978,  1006,  1013,  1021,  1872,  1956,  1984
   128,  511, 1014, 1022,  1992,  2028,  2036,  2045,  3864,  3984,  4020
   256, 1023, 2037, 2046,  4029,  4074,  4083,  4093,  7893,  8058,  8103
   512, 2047, 4084, 4094,  8113,  8168,  8178,  8189, 16006, 16226, 16281
  1024, 4095, 8179, 8190, 16292, 16358, 16369, 16381, 32298, 32584, 32650
  ...

Inverse permutation: A267104.
Transpose: A265901.
Row 1: A188163.
Row 2: A266109.
Row 3: A267103.
For the known and suspected columns, see the rows listed for transposed array A265901.
Cf. A004001, A051135, A087686.
Cf. A265900 (main diagonal), A265909 (submain diagonal).
Cf. A162598 (column index of n in array), A265332 (row index of n in array).
Cf. also permutations A267111, A267112.

(define (A265903 n) (A265903bi (A002260 n) (A004736 n)))
(define (A265903bi row col) (if (= 1 row) (A188163 col) (A087686 (+ 1 (A265903bi (- row 1) col)))))

For the first row n=1, A(1,k) = A188163(k), for rows n > 1, A(n,k) = A087686(1+A(n-1,k)).

A265332 a(n) is the index of the column in A265901 where n appears; also the index of the row in A265903 where n appears.

Original entry on oeis.org

1, 2, 1, 3, 1, 1, 2, 4, 1, 1, 1, 2, 1, 2, 3, 5, 1, 1, 1, 1, 2, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 6, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 2, 3, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 2, 3, 4, 5, 7, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 2, 3, 1, 1, 1, 2, 1, 1, 2, 1, 2, 3, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 2, 3, 4

Offset: 1

Antti Karttunen, Jan 09 2016

nonn

If all 1's are deleted, the remaining terms are the sequence incremented. - after Franklin T. Adams-Watters Oct 05 2006 comment in A051135.

Ordinal transform of A162598.

			Illustration how the sequence can be constructed by concatenating the frequency counts Q_n of each successive level n of A004001-tree:
--
             1                                      Q_0 = (1)
             |
            _2__                                    Q_1 = (2)
           /    \
         _3    __4_____                             Q_2 = (1,3)
        /     /  |     \
      _5    _6  _7    __8___________                Q_3 = (1,1,2,4)
     /     /   / |   /  |  \        \
   _9    10  11 12  13  14  15___    16_________    Q_4 = (1,1,1,2,1,2,3,5)
  /     /   /  / |  /  / |   |\  \   | \  \  \  \
17    18  19 20 21 22 23 24 25 26 27 28 29 30 31 32
--
The above illustration copied from the page 229 of Kubo and Vakil paper (page 5 in PDF).

Antti Karttunen, Table of n, a(n) for n = 1..8192
T. Kubo and R. Vakil, On Conway's recursive sequence, Discr. Math. 152 (1996), 225-252.

Essentially same as A051135 apart from the initial term, which here is set as a(1)=1.
Cf. A004001, A265901, A265903.
Cf. A162598 (corresponding other index).
Cf. A265754.
Cf. also A267108, A267109, A267110.

terms = 120;
h[1] = 1; h[2] = 1;
h[n_] := h[n] = h[h[n - 1]] + h[n - h[n - 1]];
seq[nmax_] := seq[nmax] = (Length /@ Split[Sort @ Array[h, nmax, 2]])[[;; terms]];
seq[nmax = 2 terms];
seq[nmax += terms];
While[seq[nmax] != seq[nmax - terms], nmax += terms];
seq[nmax] (* Jean-François Alcover, Dec 19 2021 *)

(define (A265332 n) (if (= 1 n) 1 (A051135 n)))

a(1) = 1; for n > 1, a(n) = A051135(n).

A265901 Square array read by descending antidiagonals: A(n,1) = A188163(n), and for k > 1, A(n,k) = A087686(1+A(n,k-1)).

Original entry on oeis.org

1, 2, 3, 4, 7, 5, 8, 15, 12, 6, 16, 31, 27, 14, 9, 32, 63, 58, 30, 21, 10, 64, 127, 121, 62, 48, 24, 11, 128, 255, 248, 126, 106, 54, 26, 13, 256, 511, 503, 254, 227, 116, 57, 29, 17, 512, 1023, 1014, 510, 475, 242, 120, 61, 38, 18, 1024, 2047, 2037, 1022, 978, 496, 247, 125, 86, 42, 19, 2048, 4095, 4084, 2046, 1992, 1006, 502, 253, 192, 96, 45, 20

Offset: 1

Antti Karttunen, Dec 18 2015

Square array read by descending antidiagonals: A(1,1), A(1,2), A(2,1), A(1,3), A(2,2), A(3,1), etc.
The topmost row (row 1) of the array is A000079 (powers of 2), and in general each row 2^k contains the sequence (2^n - k), starting from the term (2^(k+1) - k). This follows from the properties (3) and (4) of A004001 given on page 227 of Kubo & Vakil paper (page 3 in PDF).
Moreover, each row 2^k - 1 (for k >= 2) contains the sequence 2^n - n - (k-2), starting from the term (2^(k+1) - (2k-1)). To see why this holds, consider the definitions of sequences A162598 and A265332, the latter which also illustrates how the frequency counts Q_n for A004001 are recursively constructed (in the Kubo & Vakil paper).

			The top left corner of the array:
   1,  2,   4,   8,  16,   32,   64,  128,  256,   512,  1024, ...
   3,  7,  15,  31,  63,  127,  255,  511, 1023,  2047,  4095, ...
   5, 12,  27,  58, 121,  248,  503, 1014, 2037,  4084,  8179, ...
   6, 14,  30,  62, 126,  254,  510, 1022, 2046,  4094,  8190, ...
   9, 21,  48, 106, 227,  475,  978, 1992, 4029,  8113, 16292, ...
  10, 24,  54, 116, 242,  496, 1006, 2028, 4074,  8168, 16358, ...
  11, 26,  57, 120, 247,  502, 1013, 2036, 4083,  8178, 16369, ...
  13, 29,  61, 125, 253,  509, 1021, 2045, 4093,  8189, 16381, ...
  17, 38,  86, 192, 419,  894, 1872, 3864, 7893, 16006, 32298, ...
  18, 42,  96, 212, 454,  950, 1956, 3984, 8058, 16226, 32584, ...
  19, 45, 102, 222, 469,  971, 1984, 4020, 8103, 16281, 32650, ...
  20, 47, 105, 226, 474,  977, 1991, 4028, 8112, 16291, 32661, ...
  22, 51, 112, 237, 490,  999, 2020, 4065, 8158, 16347, 32728, ...
  23, 53, 115, 241, 495, 1005, 2027, 4073, 8167, 16357, 32739, ...
  25, 56, 119, 246, 501, 1012, 2035, 4082, 8177, 16368, 32751, ...
  28, 60, 124, 252, 508, 1020, 2044, 4092, 8188, 16380, 32764, ...
  ...

Antti Karttunen, Table of n, a(n) for n = 1..210; the first 20 antidiagonals of array
T. Kubo and R. Vakil, On Conway's recursive sequence, Discr. Math. 152 (1996), 225-252.
Index entries for Hofstadter-type sequences
Index entries for sequences that are permutations of the natural numbers

Inverse permutation: A267102.
Transpose: A265903.
Cf. A265900 (main diagonal).
Cf. A162598 (row index of n in array), A265332 (column index of n in array).
Cf. A004001, A051135, A088359, A087686.
Column 1: A188163.
Column 2: A266109.
Row 1: A000079 (2^n).
Row 2: A000225 (2^n - 1, from 3 onward).
Row 3: A000325 (2^n - n, from 5 onward).
Row 4: A000918 (2^n - 2, from 6 onward).
Row 5: A084634 (?, from 9 onward).
Row 6: A132732 (2^n - 2n + 2, from 10 onward).
Row 7: A000295 (2^n - n - 1, from 11 onward).
Row 8: A036563 (2^n - 3).
Row 9: A084635 (?, from 17 onward).
Row 12: A048492 (?, from 20 onward).
Row 13: A249453 (?, from 22 onward).
Row 14: A183155 (2^n - 2n + 1, from 23 onward. Cf. also A244331).
Row 15: A000247 (2^n - n - 2, from 25 onward).
Row 16: A028399 (2^n - 4).
Cf. also permutations A267111, A267112.

(define (A265901 n) (A265901bi (A002260 n) (A004736 n)))
(define (A265901bi row col) (if (= 1 col) (A188163 row) (A087686 (+ 1 (A265901bi row (- col 1))))))

For the first column k=1, A(n,1) = A188163(n), for columns k > 1, A(n,k) = A087686(1+A(n,k-1)).

A267102 Inverse permutation to A265901.

Original entry on oeis.org

1, 2, 3, 4, 6, 10, 5, 7, 15, 21, 28, 9, 36, 14, 8, 11, 45, 55, 66, 78, 20, 91, 105, 27, 120, 35, 13, 136, 44, 19, 12, 16, 153, 171, 190, 210, 231, 54, 253, 276, 300, 65, 325, 351, 77, 378, 90, 26, 406, 435, 104, 465, 119, 34, 496, 135, 43, 18, 528, 152, 53, 25, 17, 22, 561, 595, 630, 666, 703, 741, 170, 780, 820

Offset: 1

Antti Karttunen, Jan 10 2016

nonn

Antti Karttunen, Table of n, a(n) for n = 1..10000
Index entries for sequences that are permutations of the natural numbers

Inverse: A265901.

Cf. A162598, A265332.

(define (A267102 n) (let ((col (A265332 n)) (row (A162598 n))) (* (/ 1 2) (- (expt (+ row col) 2) row col col col -2))))

a(n) = (1/2) * ((c+r)^2 - r - 3*c + 2), where c = A265332(n), and r = A162598(n).

A267104 Inverse permutation to A265903.

Original entry on oeis.org

1, 3, 2, 6, 4, 7, 5, 10, 11, 16, 22, 8, 29, 12, 9, 15, 37, 46, 56, 67, 17, 79, 92, 23, 106, 30, 13, 121, 38, 18, 14, 21, 137, 154, 172, 191, 211, 47, 232, 254, 277, 57, 301, 326, 68, 352, 80, 24, 379, 407, 93, 436, 107, 31, 466, 122, 39, 19, 497, 138, 48, 25, 20, 28, 529, 562, 596, 631, 667, 704, 155, 742, 781, 821

Offset: 1

Antti Karttunen, Jan 10 2016

nonn

Antti Karttunen, Table of n, a(n) for n = 1..10000
Index entries for sequences that are permutations of the natural numbers

Inverse: A265903.

Cf. A162598, A265332.

(define (A267104 n) (let ((col (A162598 n)) (row (A265332 n))) (* (/ 1 2) (- (expt (+ row col) 2) row col col col -2))))

a(n) = (1/2) * ((c+r)^2 - r - 3*c + 2), where c = A162598(n), and r = A265332(n).

cp's OEIS Frontend

A080677 a(n) = n + 1 - A004001(n).

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Scheme

Formula

A265903 Square array read by descending antidiagonals: A(1,k) = A188163(k), and for n > 1, A(n,k) = A087686(1+A(n-1,k)).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Scheme

Formula

A265332 a(n) is the index of the column in A265901 where n appears; also the index of the row in A265903 where n appears.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Scheme

Formula

A265901 Square array read by descending antidiagonals: A(n,1) = A188163(n), and for k > 1, A(n,k) = A087686(1+A(n,k-1)).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Scheme

Formula

A267102 Inverse permutation to A265901.

Views

Author

Keywords

Links

Crossrefs

Programs

Scheme

Formula

A267104 Inverse permutation to A265903.

Views

Author

Keywords

Links

Crossrefs

Programs

Scheme

Formula