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

 

Logo

"Email this user" was broken Aug 14 to 9am Aug 16. If you sent someone a message in this period, please send it again.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A093094 "Products into digits": start with a(1)=2, a(2)=2; adjoin digits of product of a(k) and a(k+1) for k from 1 to infinity. 5
2, 2, 4, 8, 3, 2, 2, 4, 6, 4, 8, 2, 4, 2, 4, 3, 2, 1, 6, 8, 8, 8, 1, 2, 6, 2, 6, 4, 8, 6, 4, 6, 4, 8, 2, 1, 2, 1, 2, 1, 2, 2, 4, 3, 2, 4, 8, 2, 4, 2, 4, 2, 4, 3, 2, 1, 6, 2, 2, 2, 2, 2, 2, 4, 8, 1, 2, 6, 8, 3, 2, 1, 6, 8, 8, 8, 8, 8, 1, 2, 6, 2, 6, 1, 2, 4, 4, 4, 4, 4, 8, 3, 2, 8, 2, 1, 2, 4, 8, 2, 4 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Only the digits 1,2,3,4,6,8 occur, infinitely often. The sequence is not periodic. Around a(800) there are many 8's.

Comment from Giovanni Resta, Mar 16 2006: "Proof that sequence is not periodic:

"Let us assume that somewhere in the sequence there is a subsequence of 3 adjacent 8': ...,8,8,8,....(which is true).

"Then we know that in the following there will be the subsequence ...,6,4,6,4.. (i.e. 8x8, 8x8) again, there will be somewhere ...,2,4,2,4,2,4,... (i.e. 6x4, 4x6, 6x4) and finally ...,8,8,8,8,8,...

"Analogously, starting from 8,8,8,8 we obtain 6,4,6,4,6,4 then 2,4,2,4,2,4,2,4,2,4 and finally 8,8,8,8,8,8,8,8,8.

"Generalizing, if somewhere appears a run of k>2 8's, then in some future position will appear a run of at least 4*k-7 8's (where since k>2, 4*k-7>k).

"So the sequence will contain arbitrary long runs of 8's, without being constantly equal to 8, thus it cannot be periodic."

Essentially the same as A045777. [From R. J. Mathar, Sep 08 2008]

LINKS

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

EXAMPLE

a(3)=a(1)*a(2), a(4)=a(2)*a(3), a(5)=first digit of (a(3)*a(4)), a(6)=2nd digit of (a(3)*a(4)), a(9)=a(6)*a(7)

PROG

(Haskell)

a093094 n = a093094_list !! (n-1)

a093094_list = f [2, 2] where

   f (u : vs@(v : _)) = u : f (vs ++

     if w < 10 then [w] else uncurry ((. return) . (:)) $ divMod w 10)

        where w = u * v

-- Reinhard Zumkeller, Aug 08 2013

CROSSREFS

Cf. A093086-A093091.

Sequence in context: A065844 A131199 A112059 * A045777 A136534 A121175

Adjacent sequences:  A093091 A093092 A093093 * A093095 A093096 A093097

KEYWORD

nonn,base

AUTHOR

Bodo Zinser, Mar 20 2004

EXTENSIONS

Definition revised by Franklin T. Adams-Watters, Mar 16 2006

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified August 17 13:03 EDT 2017. Contains 290635 sequences.