A061272 Squares such that (1) each digit is a square, (2) the sum of squares of the digits is a square.
0, 1, 4, 9, 100, 400, 900, 1444, 10000, 40000, 90000, 144400, 1000000, 4000000, 9000000, 14440000, 94109401, 100000000, 400000000, 900000000, 1444000000, 9410940100, 10000000000, 10100049001, 40000000000, 90000000000, 144400000000, 414441100441, 941094010000
Offset: 1
Examples
1444 = 38^2, each digit is a square, Sum of the squares of digits = 1+16+16+16 = 49 = 7^2.
References
- Amarnath Murthy, Smarandache Pythagoras Additive Square Sequence. (To be published in Smarandache Notions Journal).
Programs
-
Mathematica
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 *)
Extensions
Corrected and extended by Harvey P. Dale, May 12 2011
More terms from Jason Yuen, Aug 27 2025