A029794 Squares n such that sqrt(n) and n have the same set of digits.

0, 1, 100, 10000, 1000000, 22676644, 23348224, 100000000, 107661376, 110103049, 125552025, 153388225, 160022500, 219899241, 504002500, 552532036, 605406025, 696643236, 1169366416, 1311526225, 2267664400

Offset

1,3

Comments

Only perfect squares are considered. Otherwise, this sequence would have to include numbers like 1234567890, since sqrt(1234567890) = 35136.41828644462161665823116758077037159... - Alonso del Arte, Jan 12 2020

Links

Shawn A. Broyles and David A. Corneth, Table of n, a(n) for n = 1..10000 (First 1001 terms by Shawn A. Broyles)

Formula

a(n) = A029793(n)^2. - Michel Marcus, Apr 29 2018

Mathematica

Select[Range[0, 199999], Union[IntegerDigits[#]] == Union[IntegerDigits[#^2]] &]^2 (* Alonso del Arte, Jan 12 2020 *)

Prog

(PARI) lista(nn) = {for (n=0, nn, if (Set(digits(n^2)) == Set(digits(n)), print1(n^2, ", ")); ); } \\ Michel Marcus, Apr 29 2018

Crossrefs

Cf. A029793.

Sequence in context: A029775 A077440 A181412 * A029801 A098608 A045799

Adjacent sequences: A029791 A029792 A029793 * A029795 A029796 A029797

Keyword

nonn,base

Author

Patrick De Geest

Extensions

Offset corrected by Michel Marcus, Apr 29 2018

Status

approved