A045982 Describe all the previous terms!.
1, 11, 31, 311311, 31131113211321, 3113111321132113211331131221131211, 31131113211321132113311312211312111321133113122113122113122123211311222113111221
Offset: 1
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 1..10
- Eric Weisstein's World of Mathematics, Look and Say Sequence.
- Wikipedia, Look-and-say sequence.
Programs
-
Haskell
a045982 n = a045982_list !! (n-1) a045982_list = 1 : f [1] where f xs = y : f (xs ++ [y]) where y = a045918 $ read (concatMap show xs) -- Reinhard Zumkeller, Feb 28 2014
Extensions
More terms from Patrick De Geest, Jun 15 1999
Comments