[go: up one dir, main page]

login
A061272
Squares such that (1) each digit is a square, (2) the sum of squares of the digits is a square.
0
0, 1, 4, 9, 100, 400, 900, 1444, 10000, 40000, 90000, 144400, 1000000, 4000000, 9000000, 14440000, 94109401
OFFSET
1,3
REFERENCES
Amarnath Murthy, Smarandache Pythagoras Additive Square Sequence. (To be published in Smarandache Notions Journal).
EXAMPLE
1444 = 38^2, each digit is a square, Sum of the squares of digits = 1+16+16+16 = 49 = 7^2.
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 *)
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Apr 24 2001
EXTENSIONS
Corrected and extended by Harvey P. Dale, May 12 2011.
STATUS
approved