OFFSET
1,2
COMMENTS
REFERENCES
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), p. 840.
LINKS
P. A. MacMahon, Divisors of numbers and their continuations in the theory of partitions, Proc. London Math. Soc., 19 (1919), 75-113.
W. Sierpinski, Number Of Divisors And Their Sum, Elementary theory of numbers, Warszawa, 1964.
Wikipedia, Euler's totient function
EXAMPLE
tau(8) = 4, phi(4)=2 and rad(8)=2 tau(13122) = 18, phi(18)=6 and rad(13122)=6
MAPLE
with(numtheory):for n from 1 to 1000000 do :t1:= ifactors(n)[2] : t2 :=mul(t1[i][1], i=1..nops(t1)): if phi(tau(n)) = t2 then print (n): else fi : od :
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Feb 22 2010
EXTENSIONS
a(14)-a(17) from Donovan Johnson, Jul 27 2011
STATUS
approved