login
This site is supported by donations 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 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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 15 22:48 EDT 2019. Contains 325061 sequences. (Running on oeis4.)