%I #27 Jun 26 2024 11:27:22
%S 1,1,1,3,5,9,1,3,5,1,1,3,6,1,2,4,7,1,2,4,8,1,2,5,9,1,3,6,1,2,3,6,1,2,
%T 4,7,1,2,4,9,1,3,5,1,1,3,6,1,2,4,7,1,2,4,8,1,2,5,9,1,3,6,1,2,3,6,1,2,
%U 4,7,1,2,4,9,1,3,5,1,1,3,6,1,2,4,7,1,2,4,8,1,2,5,9,1,3,6,1,2,3,6,1,2,4
%N First digit of tribonacci sequence A000213.
%C Sequence obeys the Benford law about distribution of first digit d in a sequence: P(d) = log_10(1+1/d).
%H <a href="/index/Be#Benford">Index entries for sequences related to Benford's law</a>
%e a(10) = 1 since A000213(10) = 193.
%t t = {1,1,1}; Do[AppendTo[t, t[[-1]] + t[[-2]] + t[[-3]]], {100}]; Table[IntegerDigits[i][[1]], {i, t}]
%Y Cf. A000030, A000213.
%K nonn,base
%O 0,4
%A _Carmine Suriano_, Feb 14 2011
%E Offset changed by _Georg Fischer_, Jun 26 2024