login
A112457
a(1)=1; a(n+1)=desc(a(n))+a(n), where desc(x) is the description of x as in A005150.
0
1, 12, 1124, 212338, 1211334656, 1112213525496172, 31221113152327355441607884, 1311223113111543352330284851467051780698, 111321221321133115142315123621344927293054493947386362638861942616
OFFSET
1,2
EXAMPLE
Example a(2)=11+1=12, a(3)=1112+12=1124.
PROG
(Perl) #!/usr/bin/perl -l use strict; use warnings; use bigint; $_=1; { print my $o=$_; s/((\d)\2*)/(length $1).$2/ge; $_+=$o; <>, redo; } __END__
CROSSREFS
Cf. A109229.
Sequence in context: A004073 A109229 * A091782 A291952 A112580 A229691
KEYWORD
base,easy,nonn
AUTHOR
Michele Dondi (blazar(AT)lcm.mi.infn.it), Sep 06 2005
STATUS
approved