This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A273060 #44 Sep 08 2022 08:46:16 %S A273060 1,1,1,4,8,96,192,2304,13824,207360,829440,24883200,99532800, %T A273060 2786918400,31352832000,501645312000,4013162496000,192631799808000, %U A273060 1155790798848000,52010585948160000,728148203274240000,19223112566439936000,192231125664399360000 %N A273060 a(n) = phi(n!)/phi(n). %H A273060 Robert Israel, <a href="/A273060/b273060.txt">Table of n, a(n) for n = 1..450</a> %F A273060 a(n) = A048855(n)/A000010(n). - _Michel Marcus_, Oct 30 2016 %p A273060 seq(numtheory:-phi(n!)/numtheory:-phi(n), n=1..50); # _Robert Israel_, Nov 13 2016 %t A273060 Table[EulerPhi[n!]/EulerPhi[n], {n,1,25}] (* _G. C. Greubel_, Oct 30 2016 *) %o A273060 (Magma) [EulerPhi(Factorial(n)) div EulerPhi(n): n in [1..25]]; // _Vincenzo Librandi_, Oct 30 2016 %o A273060 (PARI) a(n) = eulerphi(n!)/eulerphi(n); \\ _Michel Marcus_, Oct 30 2016 %Y A273060 Cf. A000010, A048855. %K A273060 nonn %O A273060 1,4 %A A273060 _Alexander R. Povolotsky_, Oct 29 2016