STATUS
proposed
approved
proposed
approved
editing
proposed
a[n_] := IntegerDigits[6^n][[1]]; Array[a, 100, 0] (* Amiram Eldar, Jul 15 2023 *)
proposed
editing
editing
proposed
Cf. A008567.
(PARI) a(n) = digits(6^n)[1];
nonn,changed,base,easy