A076592 First occurrence of n as a term in the continued fraction for log(2).

2, 3, 4, 31, 41, 6, 30, 90, 89, 16, 188, 126, 29, 42, 365, 395, 71, 48, 106, 379, 484, 2097, 521, 1240, 391, 1208, 300, 118, 688, 296, 180, 75, 1843, 1532, 1547, 1303, 1721, 1545, 120, 917, 881, 2082, 111, 615, 866, 311, 952, 2095, 1293, 1065, 6140

Offset: 1

Author

Benoit Cloitre, Oct 20 2002

Keywords

• base
• nonn

Crossrefs

Cf. A016730, A032523.

Programs

Mathematica

Module[{nn=6200,cfl2},cfl2=ContinuedFraction[Log[2],nn];Table[Position[cfl2,n,1,1],{n,60}]]//Flatten (* Harvey P. Dale, Mar 09 2023 *)

PARI

default(realprecision, 1500); v=contfrac(log(2)); a(n)=if(n<0,0,s=1; while(abs(n-component(v,s))>0,s++); s)