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 A061272 #12 Aug 27 2025 09:14:22 %S A061272 0,1,4,9,100,400,900,1444,10000,40000,90000,144400,1000000,4000000, %T A061272 9000000,14440000,94109401,100000000,400000000,900000000,1444000000, %U A061272 9410940100,10000000000,10100049001,40000000000,90000000000,144400000000,414441100441,941094010000 %N A061272 Squares such that (1) each digit is a square, (2) the sum of squares of the digits is a square. %D A061272 Amarnath Murthy, Smarandache Pythagoras Additive Square Sequence. (To be published in Smarandache Notions Journal). %e A061272 1444 = 38^2, each digit is a square, Sum of the squares of digits = 1+16+16+16 = 49 = 7^2. %t A061272 okQ[n_]:=Module[{fd=FromDigits[n]},IntegerQ[Sqrt[fd]]&&IntegerQ[ Sqrt[ Total[n^2]]]]; FromDigits/@Select[Tuples[{0,1,4,9},8],okQ] (* _Harvey P. Dale_, May 12 2011 *) %Y A061272 Cf. A053057, A053059, A061267, A061268, A061269, A061270, A061090. %K A061272 nonn,base,changed %O A061272 1,3 %A A061272 _Amarnath Murthy_, Apr 24 2001 %E A061272 Corrected and extended by _Harvey P. Dale_, May 12 2011 %E A061272 More terms from _Jason Yuen_, Aug 27 2025