OFFSET
1,2
COMMENTS
The sequence has a different pattern if, instead of including integers greater than ten in the description of each block of three, one uses symbols to represent those numbers. For example, in a(7), if the subsequence "111012101510" is replaced by "11A12A15A" then the interaction of digits with each other is altered.
EXAMPLE
a(1) is read as "one one in the first block", so a(2) is 111.
a(2) is read as "three ones in the first block", so a(3) is 311.
a(3) is read as "one three in the first block, two ones in the first block", so a(4) is 131211.
a(4) is read as "one one in the first block, one three in the first block, one one in the first block, one two in the second block, two ones in the second block", so a(5) is 111131111122212.
MATHEMATICA
{1}~Join~NestList[(s=Split/@Partition[IntegerDigits[#], 3]; FromDigits@Flatten@Table[Join[Reverse@#, IntegerDigits[k]]&/@({First@#, Length@#}&/@#&/@s)[[k]], {k, Length@s}])&, 111, 5] (* Giorgos Kalogeropoulos, Dec 08 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Thomas S. Pedigo, Dec 06 2021
STATUS
approved