login
A334319
Number of integers m in base n with distinct digits such that the number formed by the consecutive subsequence of the initial j digits is divisible by j for all j in {1,...,length(m)}.
1
1, 3, 4, 16, 18, 54, 112, 225, 397, 707, 1566, 2664, 6960, 9213, 23066, 39980, 100239, 116229, 455539, 465054, 1157163, 2064246, 6735123, 4609476, 22943866, 27085154, 64108419, 76354062, 420698429, 180541932, 1833215296, 1057775180, 3361833346, 5293490772, 14955881506, 7186246508
OFFSET
1,2
MAPLE
b:= proc(n, s, w) option remember; `if`(s={}, 0, (k-> add((t->
`if`(t=0, 1, `if`(irem(t, k)=0, b(n, s minus {j}, t)
+1, 0)))(w*n+j), j=s)))(1+n-nops(s))
end:
a:= n-> b(n, {$0..n-1}, 0):
seq(a(n), n=1..18);
CROSSREFS
Row sums of A334318.
Sequence in context: A042541 A325212 A329890 * A330299 A047164 A304988
KEYWORD
nonn,base
AUTHOR
Alois P. Heinz, Apr 22 2020
EXTENSIONS
a(27)-a(36) from Giovanni Resta, May 04 2020
STATUS
approved