[go: up one dir, main page]

login
Numbers k such that 6 is the smallest decimal digit of k^2.
7

%I #11 Sep 09 2017 03:32:07

%S 26,83,264,313,824,836,883,887,937,3114,8167,8813,8887,8937,9417,9833,

%T 25824,26264,29614,29626,89324,89437,93637,94863,98336,260167,262617,

%U 314113,817863,817924,818333,818474,823887,828667,835386,875614,931117,936417,937383

%N Numbers k such that 6 is the smallest decimal digit of k^2.

%C 9949370777987917 is the smallest number k such that the smallest decimal digit of k^2 is 7. - _Chai Wah Wu_, Sep 08 2017

%H Chai Wah Wu, <a href="/A291631/b291631.txt">Table of n, a(n) for n = 1..10001</a>

%e 26 is in the sequence because 26^2 = 676, the smallest decimal digit of which is 6.

%t Select[Range[10^6], Min[IntegerDigits[#^2]]==6 &] (* _Vincenzo Librandi_, Sep 09 2017 *)

%o (PARI) select(k->vecmin(digits(k^2))==6, vector(1000000, k, k))

%Y Cf. A291625, A291626, A291627, A291628, A291629, A291630.

%K nonn,base

%O 1,1

%A _Colin Barker_, Aug 28 2017