%I #14 Oct 29 2024 08:28:39
%S 1,2,6,42,1656,3263442,10602458193600,113418211994216207709696000,
%T 12864938683276241891688635987477942287491075520480800,
%U 164509411410546646527417252552411687615280114012485682055193015232979290788896945885448940165659663840000
%N a(n) = phi(A000058(n)) where phi is the Euler totient function and A000058 is Sylvester's sequence.
%H Amiram Eldar, <a href="/A367132/b367132.txt">Table of n, a(n) for n = 0..10</a>
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Sylvester%27s_sequence#Divisibility_and_factorizations">Sylvester's sequence: Divisibility and factorizations</a>.
%F a(n) = A000010(A000058(n)).
%t EulerPhi[a[0] = 2; a[k_] := a[k - 1]^2 - a[k - 1] + 1; Table[a[k], {k, 0, 9}]] (* _Paul F. Marrero Romero_, Nov 19 2023 *)
%Y Cf. A000058, A000010, A091335.
%K nonn,changed
%O 0,2
%A _Sean A. Irvine_, Nov 05 2023