A062732 Squares arising in A039770.
1, 1, 4, 4, 4, 4, 16, 16, 16, 36, 16, 16, 36, 16, 36, 36, 36, 64, 100, 36, 36, 100, 36, 64, 64, 64, 64, 144, 64, 196, 100, 64, 144, 64, 100, 256, 144, 144, 144, 144, 144, 144, 144, 144, 144, 196, 400, 144, 144, 144, 400, 144, 144, 324, 144, 400, 256, 324, 256, 144
Offset: 1
Keywords
References
- D. M. Burton, Elementary Number Theory, Allyn and Bacon Inc., Boston MA, 1976, p. 141.
Links
- Harry J. Smith, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A039770.
Programs
-
PARI
je=[]; for(n=1,1000, if(issquare(eulerphi(n)),je=concat(je,eulerphi(n)))); je
-
PARI
n=0; for (m=1, 10^5, if (issquare(a=eulerphi(m)), write("b062732.txt", n++, " ", a); if (n==1000, break))) \\ Harry J. Smith, Aug 10 2009