editing
approved
editing
approved
NestList[FromDigits[Flatten[IntegerDigits/@(IntegerDigits[#]^2)]]&, 6, 10] (* Harvey P. Dale, Feb 28 2013 *)
approved
editing
_Matthew Vandermast (ghodges14(AT)comcast.net), _, Apr 01 2003
a(4)=81936 because the squares of the digits of a(3)--namely, 9, 3, and 6--are 81, 9, and 36 respectively.
base,easy,nonn,new
base,easy,nonn,new
Matthew Vandermast (ghodges14(AT)msncomcast.comnet), Apr 01 2003
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
1,1
If m is a member of the sequence consisting of k base-10 digits, every member of the sequence greater than m is congruent to m modulo 10^k.
a(4)=81936 because the squares of the digits of a(3)--namely, 9, 3, and 6--are 81, 9, and 36 respectively.
base,easy,nonn
Matthew Vandermast (ghodges14(AT)msn.com), Apr 01 2003
approved