This site is supported by donations 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 A187894 A214591 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 July 15 22:48 EDT 2019. Contains 325061 sequences. (Running on oeis4.)