The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A099974 Write log(2) as a binary fraction; read this from left to right and whenever a 1 appears, note the integer formed by reading leftwards from that 1. 11
 1, 5, 13, 141, 653, 1677, 3725, 20109, 544397, 2641549, 6835853, 15224461, 32001677, 65556109, 132664973, 266882701, 803753613, 1877495437, 4024979085, 8319946381, 16909880973, 51269619341, 601025433229, 1700537061005 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 LINKS EXAMPLE log(2) = 0.69314718055994530941723212145817656807550013436025525412... = 0.1011000101110010000101111111011111010001110011110111100110101011110010011110... in binary. MATHEMATICA d = 100; l = First[RealDigits[N[Log[2], d], 2]]; Do[m = Take[l, n]; k = Length[m]; If[m[[k]] == 1, Print[FromDigits[Reverse[m], 2]]], {n, 1, d}] (* Ryan Propper, Aug 17 2005 *) Module[{nn=50, l2}, l2=RealDigits[Log[2], 2, nn][[1]]; Table[FromDigits[ Reverse[ Take[ l2, n]], 2], {n, nn}]]//Union (* Harvey P. Dale, Mar 29 2016 *) CROSSREFS Cf. A002162, A099969, A099970, A099971, A099972, A099973. Sequence in context: A005764 A305643 A316919 * A247820 A336097 A187894 Adjacent sequences:  A099971 A099972 A099973 * A099975 A099976 A099977 KEYWORD nonn,easy AUTHOR N. J. A. Sloane, Nov 13, 2004, based on correspondence from Artur Jasinski, Mar 25 2003 EXTENSIONS More terms from Ryan Propper, Aug 17 2005 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 18 11:57 EST 2022. Contains 350455 sequences. (Running on oeis4.)