A257665 Totient of the n-th perfect number.
2, 12, 240, 4032, 16773120, 4294901760, 68719214592, 1152921503533105152, 1329227995784915871750885555673497600, 95780971304118053647396688887409314154826126411694080, 6582018229284824168619876730229320890292528855852623664389292032
Offset: 1
Keywords
Programs
-
Mathematica
Map[EulerPhi, (# (# + 1))/2 & /@ Select[2^Range[100] - 1, PrimeQ]] (* Michael De Vlieger, Jul 25 2015, after Harvey P. Dale at A000396 *)