A337356 Numbers whose digit sum of their square is equal to their square root.

0, 1, 49, 484, 625, 784, 1296

Offset

1,3

Links

Table of n, a(n) for n=1..7.

Formula

a(n) = A055575(n)^2. - Joerg Arndt, Sep 01 2020

Mathematica

Select[Range[0, 36], Plus @@ IntegerDigits[#^4] == # &]^2 (* Amiram Eldar, Sep 08 2020 *)

Crossrefs

Cf. A055575.

Sequence in context: A263706 A263707 A061621 * A030510 A104935 A110203

Adjacent sequences: A337353 A337354 A337355 * A337357 A337358 A337359

Keyword

nonn,base,fini,full

Author

Evzen Stejskal, Aug 24 2020

Status

approved