%I #4 May 10 2015 17:00:52
%S 0,1,16,144,1536,7200,51840,282240,1474560,7464960,55296000,200724480,
%T 1051066368,6167715840,21459271680,114960384000,523197480960,
%U 2214903398400,9311791104000,41500698624000,183936614400000
%N Phi(binomial(2*n,n)*n^3).
%p with(numtheory):with(combinat):a:=n->phi(binomial(2*n,n)*n^3): seq(a(n), n=0..22);
%t Table[EulerPhi[Binomial[2n,n]n^3],{n,0,20}] (* _Harvey P. Dale_, May 10 2015 *)
%Y Cf. A005429.
%K nonn
%O 0,3
%A _Zerinvary Lajos_, Oct 07 2007
|