%I A112512
%S A112512 2,12,1112,3112,132112,311322,232122,421311,14123113,41141223,24312213,
%T A112512 32142321,23322114,32232114,23322114,32232114,23322114,32232114
%N A112512 Say what you see in previous term, same as A063850, but starting with
2.
%C A112512 Eventually periodic, eventually identical (to a shift of) A063850.
%o A112512 (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__
%Y A112512 Cf. A005150, A005151, A063850, A112512-A112516.
%Y A112512 Sequence in context: A112373 A058975 A057120 this_sequence A006751 A023989
A001389
%Y A112512 Adjacent sequences: A112509 A112510 A112511 this_sequence A112513 A112514
A112515
%K A112512 base,easy,nonn
%O A112512 1,1
%A A112512 Michele Dondi (blazar(AT)lcm.mi.infn.it), Sep 09 2005
|