login
A112513
Same as A063850, Say what you see in previous term, but starting with 3.
0
3, 13, 1113, 3113, 2321, 221311, 223113, 222321, 421311, 14123113, 41141223, 24312213, 32142321, 23322114, 32232114, 23322114, 32232114, 23322114, 32232114, 23322114
OFFSET
1,1
COMMENTS
Eventually periodic.
PROG
(Perl) #!/usr/bin/perl -l use strict; use warnings; die "Usage: $0 <number> " unless @ARGV==1; $_=shift; { print; my (%cnt, %saw); $cnt{$_}++ for /./g; s/./ $saw{$&}++ ? '' : $cnt{$&} . $& /ge; <>, redo; } __END__
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Michele Dondi (blazar(AT)lcm.mi.infn.it), Sep 09 2005
STATUS
approved