A125293 Numbers with at least one 1 and one 2 in ternary representation.

5, 7, 11, 14, 15, 16, 17, 19, 21, 22, 23, 25, 29, 32, 33, 34, 35, 38, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 55, 57, 58, 59, 61, 63, 64, 65, 66, 67, 68, 69, 70, 71, 73, 75, 76, 77, 79, 83, 86, 87, 88, 89, 92, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106

Offset

1,1

Comments

Complement of A125292; A062756(a(n))*A081603(a(n)) > 0;

A125291(a(n)) > 1.

Links

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

Eric Weisstein's World of Mathematics, Ternary

Index entries for 3-automatic sequences.

Mathematica

Select[Range[120], DigitCount[#, 3, 1]>0&&DigitCount[#, 3, 2]>0&] (* Harvey P. Dale, Apr 12 2013 *)

Crossrefs

Cf. A007089, A125290.

Sequence in context: A136055 A250127 A181494 * A354164 A098243 A037141

Adjacent sequences: A125290 A125291 A125292 * A125294 A125295 A125296

Keyword

nonn,base,easy

Author

Reinhard Zumkeller, Nov 26 2006

Status

approved