A029773 Squares k^2 in which the digits of k appear.

0, 1, 25, 36, 100, 121, 625, 729, 2500, 3025, 3600, 3969, 4096, 4356, 5476, 5776, 9025, 9216, 9801, 10000, 10201, 11025, 12100, 12321, 12544, 13225, 13456, 15625, 19321, 20164, 39601, 42025, 44521, 49284, 50625, 53824, 62500, 65025

Offset

1,3

Links

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

Formula

a(n) = A029772(n)^2. - Michel Marcus, Aug 29 2023

Mathematica

Select[Range[0, 300]^2, SubsetQ[IntegerDigits[#], IntegerDigits[Sqrt[#]]]&] (* Harvey P. Dale, Jan 18 2015 *)

Crossrefs

Cf. A029772.

Sequence in context: A282550 A265505 A162305 * A029781 A161783 A066217

Adjacent sequences: A029770 A029771 A029772 * A029774 A029775 A029776

Keyword

nonn,base

Author

Patrick De Geest

Status

approved