login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A076489 Number of common (distinct) digits of consecutive natural numbers. 10
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 2, 2, 2, 2, 2, 2 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,101

COMMENTS

a(A226637(n)) = 0. Reinhard Zumkeller, Sep 01 2013

This is the prefix overlap between the decimal expansions of n and n+1 (cf. A238845). - N. J. A. Sloane, Mar 22 2014

LINKS

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

MATHEMATICA

Table[Length[Intersection[IntegerDigits[w], IntegerDigits[w+1]]], {w, 1, 200}]

PROG

(Haskell)

import Data.List (intersect, nub)

a076489 n = a076489_list !! n

a076489_list = map (length . nub) $

               zipWith intersect (tail a031298_tabf) a031298_tabf

-- Reinhard Zumkeller, Sep 01 2013

CROSSREFS

Cf. A001477, A031298, A076490, A238845, A239092 (partial sums).

Sequence in context: A027388 A114295 A004216 * A211666 A297037 A127322

Adjacent sequences:  A076486 A076487 A076488 * A076490 A076491 A076492

KEYWORD

base,easy,nonn

AUTHOR

Labos Elemer, Oct 21 2002

EXTENSIONS

Initial zero prepended and offset adjusted by Reinhard Zumkeller, Sep 01 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 October 1 12:47 EDT 2020. Contains 337443 sequences. (Running on oeis4.)