|
%I #17 Nov 11 2017 07:01:11
%S 1,1,3,9,33,125,503,2083,8867,38477,169711,758369,3426415,15625647,
%T 71831229,332509595,1548599571,7251200053,34116127377,161202535685,
%U 764648531325,3639748179089,17380544553713,83237451101609
%N Reversion of Liouville's lambda function A008836.
%H David W. Wilson, <a href="/A050387/b050387.txt">Table of n, a(n) for n = 1..1000</a>
%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%H <a href="/index/Res#revert">Index entries for reversions of series</a>
%F a(n) ~ c * d^n / n^(3/2), where d = 5.108713688378203548063015568224126193350704188307969721260797356... and c = 0.096314385102371009000715233605447316121735271667339677314... - _Vaclav Kotesovec_, Nov 11 2017
%t nmax = 30; Rest[CoefficientList[InverseSeries[Series[Sum[LiouvilleLambda[n]*x^n, {n, 1, nmax}], {x, 0, nmax}]], x]] (* _Vaclav Kotesovec_, Nov 11 2017 *)
%Y Cf. A050388.
%K nonn
%O 1,3
%A _Christian G. Bower_, Nov 15 1999
|
