A022482 -id:A022482 - cp's OEIS frontend

A022483 Length of n-th term of A022482.

1, 2, 4, 6, 8, 10, 12, 16, 20, 24, 36, 48, 68, 90, 120, 164, 216, 278, 360, 472, 624, 832, 1104, 1448, 1944, 2606, 3458, 4572, 6030, 8042, 10694, 14116, 18680, 24870, 33066, 43770, 58008, 77034, 102368, 135814, 179956, 238996, 317364, 420920, 558366, 740964, 983398, 1304654

Offset: 1

Clark Kimberling

nonn

More terms from Sean A. Irvine, May 16 2019

A022484 Number of 1's in n-th term of A022482.

Original entry on oeis.org

0, 1, 3, 4, 4, 4, 6, 8, 10, 12, 20, 26, 37, 46, 62, 85, 111, 136, 176, 234, 310, 422, 561, 732, 990, 1332, 1757, 2306, 3022, 4060, 5423, 7118, 9391, 12580, 16754, 22105, 29246, 38892, 51818, 68670, 90821, 120737, 160493, 212691, 281942, 374264, 496912, 659175

Offset: 1

Clark Kimberling

Cf. A022482, A268643.

More terms from Sean A. Irvine, May 16 2019

A022485 Number of 2's in n-th term of A022482.

Original entry on oeis.org

1, 1, 1, 2, 4, 6, 5, 7, 8, 7, 10, 13, 19, 28, 36, 52, 68, 95, 124, 157, 206, 267, 353, 450, 602, 811, 1088, 1454, 1922, 2563, 3398, 4489, 5961, 7891, 10476, 13885, 18434, 24470, 32402, 43034, 57069, 75833, 100602, 133438, 177236, 235182, 312047, 413822

Offset: 1

Clark Kimberling

More terms from Sean A. Irvine, May 16 2019

A022486 Number of 3's in n-th term of A022482.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 1, 2, 5, 6, 9, 12, 16, 22, 27, 37, 47, 60, 81, 108, 143, 190, 266, 352, 463, 613, 812, 1086, 1419, 1873, 2509, 3328, 4399, 5836, 7780, 10328, 13672, 18148, 24110, 32066, 42426, 56269, 74791, 99188, 131518, 174439, 231657

Offset: 1

Clark Kimberling

Cf. A022482, A316864.

More terms from Sean A. Irvine, May 16 2019

A022487 Sum of digits in n-th term of A022482.

Original entry on oeis.org

2, 3, 5, 8, 12, 16, 19, 25, 32, 41, 58, 79, 111, 150, 200, 270, 358, 467, 604, 791, 1046, 1385, 1837, 2430, 3250, 4343, 5772, 7650, 10124, 13443, 17838, 23623, 31297, 41559, 55214, 73215, 97098, 128848, 171066, 227068, 301157, 399681, 530504, 703940, 933978, 1239182, 1644323, 2181790

Offset: 1

Clark Kimberling

Cf. A007953 (sum of digits), A022482.

More terms from Sean A. Irvine, May 16 2019

A006711 Describe previous term from the right (method A - initial term is 1).

Original entry on oeis.org

1, 11, 21, 1112, 1231, 11131211, 2112111331, 112331122112, 12212221231221, 11221113121132112211, 212221121321121113312221, 113211233112211213111221321112

Offset: 1

N. J. A. Sloane

Method A = 'frequency' followed by 'digit'-indication.

			E.g. the term after 1231 is obtained by saying "one 1, one 3, one 2, one 1", which gives 11131211.

J. H. Conway, personal communication.
Akhlesh Lakhtakia and C. A. Pickover, Observations on the Gleichniszahlen-Reihe: An Unusual Number Theory Sequence, J. Rec. Math., Vol. 25 #3, pp. 189-192, 1993.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Reinhard Zumkeller, Table of n, a(n) for n = 1..24
Onno M. Cain, Sela T. Enin, Inventory Loops (i.e. Counting Sequences) have Pre-period 2 max S_1 + 60, arXiv:2004.00209 [math.NT], 2020.
Trevor Scheopner, The Cyclic Nature (and Other Intriguing Properties) of Descriptive Numbers, Princeton Undergraduate Mathematics Journal, Issue 1, Article 4.
Eric Weisstein's World of Mathematics, Look and Say Sequence
Wikipedia, Look-and-say sequence

Cf. A005150, A022506, A022482, A022507-A022513.

a006711 n = a006711_list !! (n-1)
a006711_list = iterate (a045918 . a004086) 1
-- Reinhard Zumkeller, Mar 02 2014

A006711[1]:=1;A006711[n_]:=A006711[n]=FromDigits[Flatten[{Length[#],First[#]}&/@Split[Reverse[IntegerDigits[A006711[n-1]]]]]];Map[A006711,Range[15]] (* Peter J. C. Moses, Apr 22 2013 *)

a(n+1) = A045918(A004086(a(n))). - Reinhard Zumkeller, Mar 02 2014

A022506 Describe previous term from the right (method A - initial term is 0).

Original entry on oeis.org

0, 10, 1011, 211011, 21102112, 122112102112, 122112101112212211, 2122112231101112212211, 21221122311021132221221112, 12312211321321121021132221221112

Offset: 0

N. J. A. Sloane

Method A = 'frequency' followed by 'digit'-indication.

			The term after 1011 is obtained by saying "two 1's, one 0, one 1", which gives 211011.

Reinhard Zumkeller, Table of n, a(n) for n = 0..21
Eric Weisstein's World of Mathematics, Look and Say Sequence
Wikipedia, Look-and-say sequence

Cf. A006711, A022482, A022507-A022513.

a022506 n = a022506_list !! n
a022506_list = 0 : 10 : iterate (a045918 . a004086) 1011
-- Reinhard Zumkeller, Mar 02 2014

a[0] = 0;
a[n_] := a[n] = Split[IntegerDigits[a[n-1]]] /. L_List /; IntegerQ[L[[1]]] :> {Length[L], L[[1]]} // Reverse // Flatten // FromDigits;
a /@ Range[0, 9] (* Jean-François Alcover, Nov 26 2019 *)

For n > 1: a(n+1) = A045918(A004086(a(n))). - Reinhard Zumkeller, Mar 02 2014

More terms from Erich Friedman

A022513 Describe previous term from the right (method A - initial term is 9).

Original entry on oeis.org

9, 19, 1911, 211911, 21192112, 122112192112, 122112191112212211, 2122112231191112212211, 21221122311921132221221112, 12312211321321121921132221221112

Offset: 0

N. J. A. Sloane

Method A = 'frequency' followed by 'digit'-indication.

			E.g., the term after 1911 is obtained by saying "two 1's, one 9, one 1", which gives 211911.

Cf. A005150, A022506, A006711, A022482, A022507-A022512.

More terms from Erich Friedman

A022507 Describe previous term from the right (method A - initial term is 3).

Original entry on oeis.org

3, 13, 1311, 211311, 21132112, 122112132112, 122112131112212211, 2122112231131112212211, 21221122311321132221221112, 12312211321321121321132221221112

Offset: 0

N. J. A. Sloane

Method A = 'frequency' followed by 'digit'-indication.

			The term after 1311 is obtained by saying "two 1's, one 3, one 1", which gives 211311.

Reinhard Zumkeller, Table of n, a(n) for n = 0..21
Eric Weisstein's World of Mathematics, Look and Say Sequence
Wikipedia, Look-and-say sequence

Cf. A022506, A006711, A022482, A022508-A022513.

a022507 n = a022507_list !! n
a022507_list = iterate (a045918 . a004086) 3
-- Reinhard Zumkeller, Mar 02 2014

A022507[1]:=3;A022507[n_]:=A022507[n]=FromDigits[Flatten[{Length[#],First[#]}&/@Split[Reverse[IntegerDigits[A022507[n-1]]]]]];Map[A022507,Range[15]] (* Peter J. C. Moses, Apr 22 2013 *)

a(n+1) = A045918(A004086(a(n))). - Reinhard Zumkeller, Mar 02 2014

More terms from Erich Friedman

A138484 Say what you see in previous term, from the right, reporting total number for each digit encountered. Initial term is 0.

Original entry on oeis.org

0, 10, 1011, 3110, 102113, 13311210, 10411223, 1322311410, 1041142322, 3213243110, 1031331422, 2214313310, 1031331422, 2214313310, 1031331422, 2214313310, 1031331422, 2214313310, 1031331422, 2214313310, 1031331422

Offset: 0

Paolo P. Lava and Giorgio Balzarotti, Mar 20 2008

After a while sequence has period 2 -> {1031331422,2214313310}

			To get the term after 102113, we say: one 3's, three 1's, one 2's, one 0's, so 13311210.

Cf. A063850, A022482, A005150, A005151, A006751, A006715, A006711, A022506-A022513, A138485-A138493.

cp's OEIS Frontend

A022483 Length of n-th term of A022482.

Views

Author

Keywords

Extensions

A022484 Number of 1's in n-th term of A022482.

Views

Author

Keywords

Crossrefs

Extensions

A022485 Number of 2's in n-th term of A022482.

Views

Author

Keywords

Extensions

A022486 Number of 3's in n-th term of A022482.

Views

Author

Keywords

Crossrefs

Extensions

A022487 Sum of digits in n-th term of A022482.

Views

Author

Keywords

Crossrefs

Extensions

A006711 Describe previous term from the right (method A - initial term is 1).

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Haskell

Mathematica

Formula

A022506 Describe previous term from the right (method A - initial term is 0).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Mathematica

Formula

Extensions

A022513 Describe previous term from the right (method A - initial term is 9).

Views

Author

Keywords

Comments

Examples

Crossrefs

Extensions

A022507 Describe previous term from the right (method A - initial term is 3).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Mathematica

Formula

Extensions

A138484 Say what you see in previous term, from the right, reporting total number for each digit encountered. Initial term is 0.

Views

Author

Keywords