%I #15 Jun 25 2022 10:00:42
%S 0,1,0,4,6,136,810,28204,458766,30584656,1191878610,162323643604,
%T 14307180186486,4073323890279736,788119370902131450,
%U 472616432593062958204,197219048399199774543966,249355424516977575240738976
%N E.g.f. A(x) satisfies A'(x) = 1 + (exp(x) - 1) * A(2*x).
%F a(0) = 0, a(1) = 1; a(n+1) = Sum_{k=1..n-1} 2^k * binomial(n,k) * a(k).
%o (PARI) a_vector(n) = my(v=vector(n)); v[1]=1; for(i=1, n-1, v[i+1]=sum(j=1, i-1, 2^j*binomial(i, j)*v[j])); concat(0, v);
%Y Cf. A087650, A352860, A355233.
%K nonn
%O 0,4
%A _Seiichi Manyama_, Jun 25 2022
|