A104607 Write the natural numbers in base 3 in a triangle with k digits in the k-th row, as shown below. Sequence gives the leading diagonal.

1, 1, 1, 0, 1, 1, 1, 1, 2, 1, 2, 0, 1, 1, 0, 1, 1, 2, 0, 0, 1, 2, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 2, 1, 1, 2, 0, 0, 2, 2, 1, 2, 1, 2, 2, 2, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 2, 1, 2, 2, 1, 1, 2, 2, 1, 2, 0, 1, 2, 2, 2, 0, 2, 2, 1, 0, 2, 2, 2, 0, 1, 2, 2, 2, 2, 1, 1, 0, 1, 1, 2, 0, 1, 1, 0, 2, 0, 0, 0, 1, 1

Offset

1,9

Comments

1

21

011

1220

21221

001011...

Links

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

Mathematica

t = Flatten[IntegerDigits[Range[1000], 3]]; t[[Table[n(n + 1)/2, {n, 105}]]]

Crossrefs

Cf. A104606, A104608, A104609, A104610, A104611, A104612, A104613, A091425, A104614, A104615, A104616, A104617, A104618, A104619, A104620.

Sequence in context: A226460 A358360 A094114 * A368734 A120728 A092149

Adjacent sequences: A104604 A104605 A104606 * A104608 A104609 A104610

Keyword

base,nonn

Author

Robert G. Wilson v, Mar 16 2005

Status

approved