A291628 Numbers k such that 3 is the smallest decimal digit of k^2.
6, 58, 62, 63, 66, 86, 94, 183, 184, 186, 187, 188, 192, 194, 213, 244, 256, 272, 294, 306, 312, 583, 586, 587, 588, 607, 608, 612, 613, 614, 616, 622, 624, 628, 663, 666, 688, 706, 734, 744, 764, 806, 812, 833, 857, 874, 876, 913, 914, 924, 942, 1833, 1834
Offset: 1
Examples
58 is in the sequence because 58^2 = 3364, the smallest decimal digit of which is 3.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1880
Programs
-
Mathematica
Select[Range[10^4], Min[IntegerDigits[#^2]]==3 &] (* Vincenzo Librandi, Sep 10 2017 *)
-
PARI
select(k->vecmin(digits(k^2))==3, vector(2000, k, k))