A076594 First occurrence of n as a term in the continued fraction for log(5).
1, 20, 6, 11, 19, 12, 24, 26, 32, 66, 112, 45, 68, 318, 64, 52, 58, 41, 101, 62, 1168, 299, 291, 189, 74, 110, 122, 200, 287, 755, 734, 73, 1619, 71, 415, 268, 191, 1700, 27, 17, 547, 468, 3224, 3510, 690, 78, 3064, 258, 487, 1801, 2138, 3911, 155, 811, 1121
Offset: 1
Programs
-
Mathematica
Flatten[Table[Position[ContinuedFraction[Log[5],6000],n,{1},1],{n,60}]] (* Harvey P. Dale, Jun 26 2013 *)
-
PARI
default(realprecision, 1500); v=contfrac(log(5)); a(n)=if(n<0,0,s=1; while(abs(n-component(v,s))>0,s++); s)