|
|
A291630
|
|
Numbers k such that 5 is the smallest decimal digit of k^2.
|
|
7
|
|
|
24, 76, 87, 236, 314, 316, 766, 816, 834, 2366, 2383, 2387, 2424, 2563, 2626, 2976, 7613, 7666, 8117, 8184, 8234, 8286, 8366, 8716, 8814, 9266, 9316, 9363, 9474, 9786, 9837, 23634, 23784, 23866, 23874, 24474, 25663, 25684, 26076, 26187, 26374, 26417, 27687
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
87 is in the sequence because 87^2 = 7569, the smallest decimal digit of which is 5.
|
|
MATHEMATICA
|
Select[Range[30000], Min[IntegerDigits[#^2]]==5&] (* Harvey P. Dale, Nov 03 2023 *)
|
|
PROG
|
(PARI) select(k->vecmin(digits(k^2))==5, vector(30000, k, k))
(Python)
A291630_list = [k for k in range(1, 10**6) if min(str(k**2)) == '5'] # Chai Wah Wu, Aug 28 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|