A082027 a(1)=6; a(n) is concatenation of the squares of each digit of a(n-1), in order (in base 10).
6, 36, 936, 81936, 64181936, 3616164181936, 93613613616164181936, 819361936193613613616164181936, 641819361819361819361936193613613616164181936
Offset: 1
Examples
a(4)=81936 because the squares of the digits of a(3)--namely, 9, 3 and 6--are 81, 9 and 36 respectively.
Programs
-
Mathematica
NestList[FromDigits[Flatten[IntegerDigits/@(IntegerDigits[#]^2)]]&,6,10] (* Harvey P. Dale, Feb 28 2013 *)
Comments