A098596 Length of the n-th term in the Roman numeral Look and Say sequence A098595.

1, 2, 3, 4, 3, 6, 9, 8, 10, 15, 24, 23, 29, 36, 49, 54, 62, 75, 92, 105, 115, 138, 161, 180, 202, 231, 268, 297, 331, 376, 429, 472, 524, 593, 666, 731, 815, 912, 1017, 1120, 1244, 1383, 1536, 1689, 1873, 2074, 2291, 2526, 2790, 3083, 3398, 3749, 4131, 4552, 5023

Offset

1,2

Links

Peter J. C. Moses, Table of n, a(n) for n = 1..1000

Formula

a(n)=length(A098595(n))

Example

The 7th term in A098595 = 111115111 so a(7)=9.

Mathematica

p={4, 8, 10, 10, 10, 10, 6, 2, -4, -8, -10, -10, -6, -9, -13, -14, -4, 8, 21, 28, 27, 18, 13, 23, 39, 50, 49, 43, 34, 26, 27, 35, 43, 40, 29, 15, 7, 3, 4, 9, 14, 14, 9, 4, 1};
q={-1, -2, -3, -2, 1, 4, 5, 3, -1, -4, -3, 1, 5, 5, 1, -4, -6, -3, 2, 5, 4, 0, -4, -5, -3, 0, 2, 2, 1};
gf=Fold[x #1+#2&, 0, p]/Fold[x #1+#2&, 0, q];
CoefficientList[Series[gf, {x, 0, 99}], x] (* Peter J. C. Moses, Jun 21 2013 *)

Crossrefs

Cf. A098595. A005150 for original Look and Say sequence.

Sequence in context: A330105 A103634 A255046 * A217536 A333618 A058267

Adjacent sequences: A098593 A098594 A098595 * A098597 A098598 A098599

Keyword

easy,less,nonn,base

Author

Mark Hudson (mrmarkhudson(AT)hotmail.com), Sep 17 2004

Extensions

More terms from David Wasserman, Feb 26 2008

Status

approved