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,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1880

Example

58 is in the sequence because 58^2 = 3364, the smallest decimal digit of which is 3.

Mathematica

Select[Range[10^4], Min[IntegerDigits[#^2]]==3 &] (* Vincenzo Librandi, Sep 10 2017 *)

Prog

(PARI) select(k->vecmin(digits(k^2))==3, vector(2000, k, k))

Crossrefs

Cf. A291625, A291626, A291627, A291629, A291630, A291631.

Sequence in context: A371033 A034218 A034237 * A197543 A184708 A004301

Adjacent sequences: A291625 A291626 A291627 * A291629 A291630 A291631

Keyword

nonn,base

Author

Colin Barker, Aug 28 2017

Status

approved