A066278 Least solution to cototient(x) = n!, where cototient(x) = x-phi(x).
2, 4, 10, 36, 168, 1008, 7056, 56448, 470400, 4704000, 51528960, 618347520, 7740902400, 108372633600
Offset: 1
Examples
Solutions to x-Phi[x]=720 are {1008,1424,1432,1436,1438} of which the smallest is a(6)=1008.
Programs
-
PARI
a(n) = my(x=1); while(x-eulerphi(x) != n!, x++); x; \\ Michel Marcus, Aug 24 2019
Extensions
a(12)-a(14) from Donovan Johnson, Feb 05 2010
Comments