A031253 Write 2n-1 in base 5 and juxtapose.

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

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

map(op, [seq(ListTools:-Reverse(convert(2*n-1, base, 5)), n=1..100)]); # Robert Israel, Sep 20 2019

Mathematica

Table[IntegerDigits[2n-1, 5], {n, 60}]//Flatten (* Harvey P. Dale, Jan 14 2024 *)

Crossrefs

Sequence in context: A328747 A346061 A053382 * A291624 A291635 A308243

Adjacent sequences: A031250 A031251 A031252 * A031254 A031255 A031256

Keyword

nonn,base

Author

Clark Kimberling

Status

approved