%I#17 2016年4月2日21:53:12
%S 6,661236123612336123612336121236123612351236,
%电话1236123612336123612336126123612363612361232612361361236,
%U 123612361236123612361236123612361236123612361236123612361236123612361236123612361236123612361236123612361236123612361236
%N连接上一项的位数和和上一项位数的乘积,从6开始。
%C每个术语都是通过计算前一个数字的位数之和及其位数的乘积来创建的。将结果串联起来以给出新的数字。从6开始,第二个数字是66。第三个数字生成如下:6+6=12,6*6=36,即1236。之后,数字保持不变,因为1+2+3+6=12和1x2x3x6=36,所以再次组合1236。
%t NestList[FromDigits[Flatten@{IntegerDigits@Total@#,IntegerPigits@If[Length@#==1,#,Times@@#]}]&@IntegerBigits@#&,6,50](*_Michael De Vlieger_,2016年4月2日*)
%K nonn,基础
%O 1,1号机组
%A _桑德·克拉森,2016年4月2日