|
|
A350658
|
|
a(n) is the minimal digit, expressed in base 10, in the base-n representation of 2^n.
|
|
2
|
|
|
0, 2, 0, 1, 1, 2, 0, 2, 0, 1, 2, 2, 4, 8, 0, 1, 1, 0, 1, 8, 4, 1, 2, 2, 4, 2, 4, 1, 1, 0, 0, 6, 3, 0, 17, 1, 2, 0, 6, 2, 3, 1, 1, 2, 0, 2, 0, 1, 2, 8, 1, 2, 4, 7, 1, 4, 3, 1, 1, 0, 2, 8, 0, 5, 3, 1, 2, 1, 4, 0, 1, 2, 4, 1, 2, 3, 5, 1, 2, 19, 4, 1, 1, 3, 4, 5, 7, 1, 2
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
2,2
|
|
LINKS
|
|
|
MAPLE
|
a:= n-> min(convert(2^n, base, n)):
|
|
MATHEMATICA
|
a[n_] := Min[IntegerDigits[2^n, n]]; Array[a, 100, 2] (* Amiram Eldar, Jan 10 2022 *)
|
|
PROG
|
(PARI) for(n=2, 90, print1(vecmin(digits(2^n, n)), ", "))
(Python)
from sympy.ntheory.digits import digits
def a(n): return min(digits(2**n, n)[1:])
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|