A378001 a(n) is the (n-1)-th positive integer that is digitally balanced in base n.

2, 15, 99, 722, 8410, 123813, 2177847, 44317852, 1023457869, 26432595075, 754777789018, 23609224082310, 802772380561983, 29480883458980947, 1162849439785414095, 49030176097150565512, 2200618769387073010719, 104753196945250864019109, 5271200265927977839358758

Offset

2,1

Links

Paolo Xausa, Table of n, a(n) for n = 2..300

Formula

a(n) = A378000(n, n-1).

Mathematica

Quiet[Needs["Combinatorica`"]];
A378001[n_] := FromDigits[UnrankPermutation[(n - 1)! + n - 2, Range[0, n - 1]], n];
Array[A378001, 20, 2]

Crossrefs

Main diagonal of A378000.

Sequence in context: A362768 A376922 A258390 * A027080 A208347 A293045

Adjacent sequences: A377998 A377999 A378000 * A378002 A378003 A378004

Keyword

nonn,base

Author

Paolo Xausa, Nov 14 2024

Status

approved