A031960 Numbers with exactly three distinct base-8 digits.

66, 67, 68, 69, 70, 71, 80, 83, 84, 85, 86, 87, 88, 90, 92, 93, 94, 95, 96, 98, 99, 101, 102, 103, 104, 106, 107, 108, 110, 111, 112, 114, 115, 116, 117, 119, 120, 122, 123, 124, 125, 126, 129, 131, 132, 133, 134, 135, 136, 139, 140

Offset

1,1

Links

Table of n, a(n) for n=1..51.

Index entries for 2-automatic sequences.

Mathematica

dd8Q[n_]:=Length[Union[IntegerDigits[n, 8]]]==3; Select[Range[200], dd8Q] (* Harvey P. Dale, Nov 10 2013 *)

Prog

(PARI) is(n)=#Set(digits(n, 8))==3 \\ Charles R Greathouse IV, Feb 15 2017

Crossrefs

Cf. A007094.

Sequence in context: A071712 A080592 A059175 * A376289 A181464 A250739

Adjacent sequences: A031957 A031958 A031959 * A031961 A031962 A031963

Keyword

nonn,base,easy

Author

Clark Kimberling

Status

approved