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

 

Logo
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

Table of n, a(n) for n=0..23.

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.

License Agreements, Terms of Use, Privacy Policy. .

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