|
Search: id:A112457
|
|
|
| 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
|
|
| 1, 12, 1124, 212338, 1211334656, 1112213525496172, 31221113152327355441607884, 1311223113111543352330284851467051780698, 111321221321133115142315123621344927293054493947386362638861942616
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
Example a(2)=11+1=12, a(3)=1112+12=1124.
|
|
PROGRAM
|
(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: A160010 A004073 A109229 this_sequence A091782 A112580 A103269
Adjacent sequences: A112454 A112455 A112456 this_sequence A112458 A112459 A112460
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Michele Dondi (blazar(AT)lcm.mi.infn.it), Sep 06 2005
|
|
|
Search completed in 0.002 seconds
|
