The On-Line Encyclopedia of Integer Sequences (OEIS)

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

Revision History for A119797

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A119797

Numbers m such that m and m+1 have the same number of distinct digits in decimal representation.
(history; published version)

#13 by Michael De Vlieger at Thu Sep 19 14:40:57 EDT 2024

STATUS

reviewed

approved

#12 by Stefano Spezia at Thu Sep 19 13:56:51 EDT 2024

STATUS

proposed

reviewed

#11 by James C. McMahon at Wed Sep 18 20:53:57 EDT 2024

STATUS

editing

proposed

#10 by James C. McMahon at Wed Sep 18 20:52:06 EDT 2024

MATHEMATICA

Select[Range[0, 86], CountDistinct[IntegerDigits[#]]==CountDistinct[IntegerDigits[#+1]]&] (* James C. McMahon, Sep 18 2024 *)

STATUS

approved

editing

#9 by Charles R Greathouse IV at Sat Jul 13 12:03:24 EDT 2013

LINKS

_Reinhard Zumkeller_, , <a href="/A119797/b119797.txt">Table of n, a(n) for n = 1..10000</a>

Discussion

Sat Jul 13

12:03

OEIS Server: https://oeis.org/edit/global/1934

#8 by N. J. A. Sloane at Fri Feb 22 21:38:09 EST 2013

LINKS

_Reinhard Zumkeller, _, <a href="/A119797/b119797.txt">Table of n, a(n) for n = 1..10000</a>

PROG

-- _Reinhard Zumkeller, _, Jan 04 2012

Discussion

Fri Feb 22

21:38

OEIS Server: https://oeis.org/edit/global/1866

#7 by Russ Cox at Fri Mar 30 18:50:54 EDT 2012

AUTHOR

_Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), _, May 25 2006

EXTENSIONS

Offset fixed by _Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), _, Jan 04 2012

Discussion

Fri Mar 30

18:50

OEIS Server: https://oeis.org/edit/global/246

#6 by Bruno Berselli at Wed Jan 04 17:54:03 EST 2012

STATUS

proposed

approved

#5 by Reinhard Zumkeller at Wed Jan 04 12:28:23 EST 2012

STATUS

editing

proposed

#4 by Reinhard Zumkeller at Wed Jan 04 12:15:26 EST 2012

PROG

(Haskell)

a119797 n = a119797_list !! (n-1)

a119797_list = f [0..] a043537_list where

f (u:us) (v:vs@(v':_)) | v /= v' = f us vs

| otherwise = u : f us vs

-- Reinhard Zumkeller, Jan 04 2012