login
The periodic part of the decimal expansion of prime(n-1) / prime(n).
1

%I #8 Jun 29 2012 18:55:59

%S 6,0,714285,63,846153,7647058823529411,894736842105263157,

%T 8260869565217391304347,7931034482758620689655172413,935483870967741,

%U 837,90243,953488372093023255813,9148936170212765957446808510638297872340425531,8867924528301

%N The periodic part of the decimal expansion of prime(n-1) / prime(n).

%C Number of digits of the periodic parts for n>=3 in A002371, A048595 and A071126.

%H Jaroslav Krizek, <a href="/A212528/b212528.txt">Table of n, a(n) for n = 2..60</a>

%t Table[If[n == 3, 0, FromDigits[RealDigits[Prime[n-1]/Prime[n]][[1,1]]]], {n, 2, 10}]

%Y Cf. A002371, A048595, A071126.

%K nonn,base

%O 2,1

%A _Jaroslav Krizek_, Jun 29 2012

%E Corrected by _T. D. Noe_, Jun 29 2012