login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A268312 First number of the periodic part of the "Say what you see" trajectory (see A005151) of n. 1
1031223314, 21322314, 21322314, 21322314, 21322314, 3122331415, 3122331416, 3122331417, 3122331418, 3122331419, 1031223314, 21322314, 21322314, 21322314, 21322314, 3122331415, 3122331416, 3122331417, 3122331418, 3122331419, 10311233, 21322314, 22, 21322314, 31123314, 31123315 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

COMMENTS

a(40) is the first time the periodic part of the trajectory contains more than one term.

LINKS

Julien Kluge, Table of n, a(n) for n = 0..10000

EXAMPLE

Consider the starting value n = 5. We see one five: 15. We have one ones and one 5: 1115. We have three ones and one five: 3115... We reach 3122331415 which produces itself. So a(5) = 3122331415.

MATHEMATICA

a005151[n_, m_] :=

  FromDigits[

   Reverse /@

     Sort[Tally[

       If[n == 2, m, a005151[n - 1, m]] //

        IntegerDigits], #1[[1]] < #2[[1]] &] // Flatten];

a[n_] := Block[{previousNum = 0, currentNum = 1, knownNums = {n}},

  For[i = 2, currentNum != previousNum, ++i,

   previousNum = currentNum;

   currentNum = a005151[i, n];

   If[MemberQ[knownNums, currentNum], Return[currentNum],

    AppendTo[knownNums, currentNum]];

   ];

  Return[currentNum];

  ]

a /@ Range[0, 100]

CROSSREFS

A005151 shows a[1] at term number 13.

Cf. A047841.

Sequence in context: A225295 A036745 A225218 * A035124 A197952 A321066

Adjacent sequences:  A268309 A268310 A268311 * A268313 A268314 A268315

KEYWORD

nonn,easy,base

AUTHOR

Julien Kluge, Jan 31 2016

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 12 10:54 EDT 2021. Contains 343821 sequences. (Running on oeis4.)