login
Decimal digits from Pi selected by stepping forward d+1 places at digit d, i.e., by skipping the next d places.
2

%I #30 Jun 28 2024 23:08:40

%S 3,5,5,2,4,3,2,5,1,7,7,9,0,2,9,2,4,0,6,3,4,8,5,7,8,7,0,1,5,4,4,9,2,1,

%T 9,4,4,8,3,2,2,9,6,0,2,4,3,0,2,7,6,5,8,9,9,7,6,0,6,4,5,1,6,5,6,1,5,8,

%U 3,1,9,8,9,3,8,9,3,9,7,6,8,4,2,7,2,9,7,7,7,6,6,5,0,6,7,4,7,3,1,8

%N Decimal digits from Pi selected by stepping forward d+1 places at digit d, i.e., by skipping the next d places.

%C Are the digits uniformly distributed? Are all consecutive digit subsequences uniformly distributed?

%F a(n) = the (n+a(1)+a(2)+...+a(n-1))-th digit in the decimal expansion of Pi.

%e The sequence starts with the first digit of the decimal expansion of Pi, which is 3. The next term is the digit 3+1 places after this, namely, 5, and so on.

%e The digits selected from Pi begin

%e Pi = 3, 1, 4, 1, 5, 9, 2, 6, 5, 3, 5, 8, 9, 7, 9, 3, 2, 3, 8, 4, ...

%e ^ ^ ^ ^ ^

%t a={3}; s=1; For[n=2, n<=100, n++, s+=1+Part[a,n-1]; digits=First[RealDigits[Pi,10,s]]; AppendTo[a,Part[digits,s]]]; a

%Y Cf. A000796.

%Y Cf. A373079.

%K nonn,base,cons

%O 1,1

%A _Karl Levy_, May 31 2024