A244558 Numbers obtained by concatenating the squares of the digits of Fibonacci(n).
1, 1, 4, 9, 25, 64, 19, 41, 916, 2525, 6481, 11616, 499, 94949, 3610, 816449, 1258149, 4256416, 161641, 36493625, 10811636, 1494911, 464362549, 163693664, 49250425, 1419819, 1813616164, 91496411, 251164481, 64940160, 19163643681, 4149649081, 925416254964
Offset: 1
Examples
For n = 7, Fibonacci(7) = 13 and a(7) = 19, which is the concatenation of the squares of the digits of 13. For n = 14, Fibonacci(14) = 377 and a(14) = 94949.
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[StringToInteger(&cat[IntegerToString(h): h in Reverse([i^2: i in Intseq(Fibonacci(n))])]): n in [1..50]];
-
Mathematica
Table[FromDigits[Flatten[IntegerDigits/@(IntegerDigits[Fibonacci[n]]^2)]],{n,40}] (* Harvey P. Dale, Jul 31 2018 *)