A226796 Number of nonnegative numbers x < 10^n such that the digits of x^2 occur with an equal frequency of 1.

10, 59, 221, 441, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611, 611

Offset: 1

Author

T. D. Noe, Jun 21 2013

Keywords

• nonn
• base

Examples

			All numbers 0 to 9 have squares containing only digits of frequency 1: 0, 1, 4, 9, 16, 25, 36, 49, 64, 81. See A119509 for the positive terms.
		

Crossrefs

Cf. A119509 (positive terms x), A225428 (for 2 digits).

Programs

Mathematica

cnt = 0; x = 0; Table[While[x < 10^n, If[Union[Last[Transpose[Tally[IntegerDigits[x^2]]]]] == {1}, cnt++]; x++]; cnt, {n, 5}]