A112515 Say what you see in previous term, same as A063850 but starting with 5.
5, 15, 1115, 3115, 132115, 31131215, 23411215, 2213143115, 2241231415, 3224311315, 3322143115, 3322311415, 3322311415, 3322311415, 3322311415, 3322311415, 3322311415
Offset: 1
Programs
-
Perl
#!/usr/bin/perl -l use strict; use warnings; die "Usage: $0
" unless @ARGV==1; $=shift; { print; my (%cnt, %saw); $cnt{$}++ for /./g; s/./ $saw{$&}++ ? '' : $cnt{$&} . $& /ge; <>, redo; } _END_