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
KEYWORD
base,easy,nonn
AUTHOR
Michele Dondi (blazar(AT)lcm.mi.infn.it), Sep 06 2005
STATUS
approved