|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|