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

Author

N. J. A. Sloane, Sep 08 2016

Keywords

• nonn

Links

• Rémy Sigrist, Table of n, a(n) for n = 1..19705
• Rémy Sigrist, C++ program for A276392

Crossrefs

Cf. A067581, A276393.

Programs

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 *)