login
Numbers whose square starts with 6 identical digits.
2

%I #3 Mar 30 2012 17:26:21

%S 57735,333334,471405,577350,666667,745356,881917,942809,1054093,

%T 1054094,1054095,1054096,1490712,1490713,1490714,1825741,1825742,

%U 1825743,2108185,2108186,2357022,2357023,2581988,2581989,2788866,2788867

%N Numbers whose square starts with 6 identical digits.

%e 57735^2=3333330225, 333334^2=111111555556.

%t Select[ Range[ 1000, 5000000 ], Length[ Union[ Take[ IntegerDigits[ #^2 ], 6 ] ] ] == 1 & ] (Jonathan Vos Post, Aug 29 2007)

%Y Cf. A119511.

%K nonn,base

%O 1,1

%A _Zak Seidov_, Aug 04 2006