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

Author

Paolo Xausa, Nov 14 2024

Keywords

• nonn
• base

Links

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

Crossrefs

Main diagonal of A378000.

Programs

Mathematica

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

Formula

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