A131573 - OEIS

%I #3 Mar 30 2012 18:49:09

%S 149,298,334,472,667,745,882,1054,1055,1056,1057,1058,1490,1491,1492,

%T 1493,1825,1826,1827,2108,2109,2356,2357,2581,2582,2788,2789,2980,

%U 2981,3161,3162,3332,3333,3334,3335,3336,3337,3338,3339,3340,3341,3342,3343

%N Numbers whose square starts with 3 identical digits.

%e 149^2 = 22201.

%t Select[Range[10, 5000], Length[Union[Take[IntegerDigits[ #^2], 3]]] == 1 &]

%K base,nonn

%O 1,1

%A _Tanya Khovanova_, Aug 28 2007