A226797 Number of n-digit numbers x such that the digits of x^2 occur with frequency 1.

10, 49, 162, 220, 170, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset: 1

Author

T. D. Noe, Jun 21 2013

Keywords

• nonn
• base

Comments

After a(5), all terms are 0.

Examples

			All numbers 0 to 9 have squares containing only digits of frequency 1: 0, 1, 4, 9, 16, 25, 36, 49, 64, 81.
		

Crossrefs

Cf. A225428, A226796.

Programs

Mathematica

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