%I #9 Jan 28 2016 18:07:55
%S 1,1,8,2,6,1,2,4,6,1,1,2,2,3,5,6,8,1,1,1,1,2,2,3,3,4,5,6,7,8,9,1,1,1,
%T 1,1,1,2,2,2,2,3,3,3,4,4,4,5,5,6,6,7,7,8,9,9,1,1,1,1,1,1,1,1,1,1,2,2,
%U 2,2,2,2,2,2,3,3,3,3,3,4,4,4,4,4,5,5,5,5,6,6,6,7,7,7,8,8,8,9,9,1,1,1,1,1,1
%N Initial decimal digit of n^4.
%H Alois P. Heinz, <a href="/A097408/b097408.txt">Table of n, a(n) for n = 1..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/GelfandsQuestion.html">Gelfand's Question</a>
%e 1, 16, 81, 256, 625, 1296, 2401, 4096, 6561, 10000, ...
%p a:= n-> parse(""||(n^4)[1]):
%p seq(a(n), n=1..120); # _Alois P. Heinz_, Jan 28 2016
%Y Cf. A000027, A002993, A002994, A097409, A097410, A097411, A097412, A097413, A097414.
%K nonn,base,easy
%O 1,3
%A _Eric W. Weisstein_, Aug 16 2004
|