A134750 Variant of permutational numbers with shifted digits 0->1->2->...->k+1 in k+1 positional system.

1, 4, 5, 18, 20, 24, 28, 32, 34, 112, 115, 124, 130, 139, 142, 160, 163, 184, 193, 199, 205, 220, 226, 232, 241, 262, 265, 283, 286, 295, 301, 310, 313, 975, 979, 995, 1003, 1019, 1023, 1075, 1079, 1115, 1127, 1139, 1147, 1195, 1203, 1215, 1227, 1263, 1267

Offset: 1

Author

Artur Jasinski, Nov 08 2007

Keywords

• nonn
• base

Comments

Variant of permutational numbers with shifted digits 0->1->2->...->k+1 in k+2 positional system see A051845

Crossrefs

Cf. A134640, A051845.

Programs

Mathematica

a = {}; b = {}; Do[AppendTo[b, n]; w = Permutations[b]; Do[j = FromDigits[1 + w[[m]], n + 1]; AppendTo[a, j], {m, 1, Length[w]}], {n, 0, 5}]; a (*Artur Jasinski*)