A053059 Squares whose product of digits is also a nonzero square.

1, 4, 9, 49, 144, 289, 441, 1444, 7744, 11236, 11449, 11664, 11881, 13689, 14884, 16384, 16641, 19881, 21316, 26896, 28224, 29241, 29929, 31684, 36481, 38416, 41616, 42436, 42849, 43264, 43681, 44944, 48841, 49284, 55696, 69169, 76176

Offset: 1

Author

Felice Russo, Feb 25 2000

Keywords

• easy
• base
• nonn

References

• Felice Russo, A set of new Smarandache functions, sequences and conjectures in number theory, American Research Press 2000

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

A061867 allows zeros. Cf. A000290.

Programs

Mathematica

nzsQ[n_]:=Module[{pd=Times@@IntegerDigits[n]},pd!=0&&IntegerQ[Sqrt[pd]]]; Select[Range[2000]^2,nzsQ] (* Harvey P. Dale, Nov 13 2012 *)

Extensions

More terms from James Sellers, Feb 28 2000