This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A244557 #24 Sep 08 2022 08:46:08
%S A244557 4,9,25,49,11,19,149,181,49,481,91,949,161,169,1649,259,2581,361,3649,
%T A244557 491,499,4981,649,6481,8149,101,109,1049,1081,119,1449,191,1949,1981,
%U A244557 11681,1251,12549,1369,13649,1499,14981,1641,1811,1819,18149,18181,411,449
%N A244557 Numbers obtained by concatenating the squares of the digits of prime(n).
%H A244557 Harvey P. Dale, <a href="/A244557/b244557.txt">Table of n, a(n) for n = 1..1000</a>
%F A244557 a(n) = A048385(A000040(n)).
%e A244557 For n = 7, prime(7) = 17 and a(7) = 149, which is the concatenation of the squares of the digits of 17. For n = 31, prime(31) = 127 and a(31) = 1449; but this term also appears at index 200, in fact prime(200) = 1223 and a(200) = 1449.
%t A244557 Table[FromDigits[Flatten[IntegerDigits/@(IntegerDigits[Prime[n]]^2)]],{n,50}] (* _Harvey P. Dale_, Aug 18 2016 *)
%o A244557 (Magma) [StringToInteger(&cat[IntegerToString(h): h in Reverse([i^2: i in Intseq(p)])]): p in PrimesUpTo(250)];
%Y A244557 Cf. A000040, A048385.
%K A244557 nonn,base
%O A244557 1,1
%A A244557 _Vincenzo Librandi_, Jul 02 2014
%E A244557 Edited by _Bruno Berselli_, Jul 02 2014