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

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

Offset: 1

Author

Robert G. Wilson v, Mar 16 2005

Keywords

• base
• nonn

Comments

1

23

101

1121

32021

222330...

Crossrefs

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

Programs

Mathematica

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