|
%I #10 Apr 28 2022 09:51:10
%S 1,2,7,36,237,1926,18147,195432,2353881,31392522,459730431,7306628652,
%T 125360110917,2306819281806,45287505051867,944784879298416,
%U 20866852729885617,486315480759519762,11921919558334283511,306644867097382161972,8255584865932073325981
%N Expansion of e.g.f. exp(Sum_{k>=1} prime(k)*x^k/k).
%F a(0) = 1; a(n) = (n-1)! * Sum_{k=1..n} prime(k) * a(n-k)/(n-k)!.
%o (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(exp(sum(k=1, N, prime(k)*x^k/k))))
%o (PARI) a(n) = if(n==0, 1, (n-1)!*sum(k=1, n, prime(k)*a(n-k)/(n-k)!));
%Y Cf. A000040, A352914.
%K nonn
%O 0,2
%A _Seiichi Manyama_, Apr 28 2022
|
