login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

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

%I #17 May 04 2020 14:25:09

%S 1,3,4,16,18,54,112,225,397,707,1566,2664,6960,9213,23066,39980,

%T 100239,116229,455539,465054,1157163,2064246,6735123,4609476,22943866,

%U 27085154,64108419,76354062,420698429,180541932,1833215296,1057775180,3361833346,5293490772,14955881506,7186246508

%N 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)}.

%p b:= proc(n, s, w) option remember; `if`(s={}, 0, (k-> add((t->

%p `if`(t=0, 1, `if`(irem(t, k)=0, b(n, s minus {j}, t)

%p +1, 0)))(w*n+j), j=s)))(1+n-nops(s))

%p end:

%p a:= n-> b(n, {$0..n-1}, 0):

%p seq(a(n), n=1..18);

%Y Row sums of A334318.

%K nonn,base

%O 1,2

%A _Alois P. Heinz_, Apr 22 2020

%E a(27)-a(36) from _Giovanni Resta_, May 04 2020