%I #14 Aug 02 2020 15:33:15
%S 1,3,0,1,1,0,0,1,2,3,0,2,0,2,3,0,2,0,3,1,2,2,1,0,2,2,3,0,3,2,2,3,0,2,
%T 1,0,0,0,2,3,0,2,0,0,3,3,3,1,3,0,2,2,3,3,3,1,0,3,1,2,0,0,2,3,3,1,1,0,
%U 2,1,3,2,1,1,0,1,2,3,2,3,1,1,2,2,0,3,3,0,1,1,1,2,0,1,3,0,2,2,0,3
%N Coefficients of 4-adic expansion of exp(4).
%H Robert Israel, <a href="/A309887/b309887.txt">Table of n, a(n) for n = 0..9999</a>
%p op([1,3],padic:-evalp(exp(4),4,100)); # _Robert Israel_, Aug 02 2020
%o (PARI) N=100; Vecrev(digits(lift(exp(4+O(2^(2*N)))), 4), N)
%Y k-adic expansion of exp(k): A317675 (k=3), this sequence (k=4), A309888 (k=5).
%Y Cf. A092426.
%K nonn,base
%O 0,2
%A _Seiichi Manyama_, Aug 21 2019
|