|
|
A291672
|
|
Numbers k such that 4 is the smallest decimal digit of k^4.
|
|
5
|
|
|
26, 46, 822, 1594, 9296, 29426, 46278, 161954, 289146, 835718, 958646, 2743904, 2764968, 5446346, 8175708, 15381676, 30590282, 52240108, 149140628, 260414482, 284539894, 299068782, 471886024, 490673642, 508339942, 827983028, 863811282, 868389594, 911303358, 1486895644
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
26 is in the sequence because 26^4 = 456976, the smallest decimal digit of which is 4.
|
|
MATHEMATICA
|
Select[Range[10^6], Min[IntegerDigits[#^4]] == 4 &] (* Giovanni Resta, Aug 29 2017 *)
|
|
PROG
|
(PARI) select(k->vecmin(digits(k^4))==4, vector(1000000, k, k))
(Python)
A291672_list = [k for k in range(1, 10**6) if min(str(k**4)) == '4'] # Chai Wah Wu, Aug 29 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|