login
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
OFFSET
2,2
LINKS
MAPLE
a:= n-> min(convert(2^n, base, n)):
seq(a(n), n=2..90); # Alois P. Heinz, Jan 10 2022
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:])
print([a(n) for n in range(2, 91)]) # Michael S. Branicky, Jan 10 2022
CROSSREFS
Cf. A350659.
Sequence in context: A204427 A178146 A305435 * A114708 A084927 A333750
KEYWORD
nonn,base
AUTHOR
Hugo Pfoertner, Jan 10 2022
STATUS
approved