login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A224782 Length of longest run of consecutive zeros in decimal representation of 2^n. 4
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 1, 1, 1, 1 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,54

COMMENTS

a(n) <= A027870(n);

a(A007377(n)) = 0;

a(A006889(n)) = n and a(m) <> n for m < A006889(n).

REFERENCES

Julian Havil, Impossible?: Surprising Solutions to Counterintuitive Conundrums, Princeton University Press 2008, chapter 15, p. 176ff

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

PROG

(Haskell)

import Data.List (group)

a224782 n = a224782_list !! n

a224782_list = map (foldl h 0 . group . show) a000079_list where

   h x zs@(z:_) = if z == '0' then max x $ length zs else x

CROSSREFS

Sequence in context: A076250 A231425 A136713 * A160322 A198293 A043281

Adjacent sequences:  A224779 A224780 A224781 * A224783 A224784 A224785

KEYWORD

nonn,base

AUTHOR

Reinhard Zumkeller, Apr 30 2013

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 August 24 03:51 EDT 2019. Contains 326260 sequences. (Running on oeis4.)