A276392 Records in A067581.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 22, 24, 25, 27, 28, 30, 33, 34, 40, 41, 42, 44, 45, 46, 47, 50, 51, 52, 53, 60, 61, 62, 63, 64, 66, 70, 71, 72, 73, 74, 80, 81, 82, 83, 84, 85, 90, 91, 92, 93, 94, 100, 101, 102, 103, 104, 105, 106, 222, 223, 224, 225, 226, 227, 228, 229, 240, 242, 244, 245

Offset

1,3

Links

Rémy Sigrist, Table of n, a(n) for n = 1..19705

Rémy Sigrist, C++ program for A276392

Mathematica

Union@ FoldList[Max, 0, #] &@ Nest[Function[s, Block[{k = 1, id = IntegerDigits@ s[[-1]]}, While[MemberQ[s, k] || Intersection[id, IntegerDigits@ k] != {}, k++]; Append[s, k]]], {1}, 160] (* Michael De Vlieger, Feb 22 2017, after Robert G. Wilson v at A067581 *)

Crossrefs

Cf. A067581, A276393.

Sequence in context: A358097 A039112 A160015 * A132271 A116069 A081511

Adjacent sequences: A276389 A276390 A276391 * A276393 A276394 A276395

Keyword

nonn

Author

N. J. A. Sloane, Sep 08 2016

Status

approved