|
Search: id:A062375
|
|
|
| A062375 |
|
Euler phi(n) / Carmichael lambda(n) = 6. |
|
+0 1
|
|
| 63, 91, 117, 126, 133, 171, 182, 189, 217, 234, 247, 259, 266, 279, 301, 333, 342, 351, 378, 387, 403, 427, 434, 441, 469, 494, 511, 518, 549, 553, 558, 559, 567, 589, 602, 603, 637, 657, 666, 679, 702, 711, 721, 763, 774, 806, 817, 837, 854, 871, 873, 882
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Solutions to A000010(n)/A002322(n)=6.
|
|
PROGRAM
|
(PARI) {cmf(f)=if( ((f[1]==2)&&(f[2]>2)), eulerphi(f[1]^f[2])/2, eulerphi(f[1]^f[2])) } {cl(f)= k=factor(f); l=1; for(x=1, omega(f), l=lcm(l, cmf([k[x, 1], k[x, 2]]))); l } {A062375(n)=eulerphi(n)/cl(n)} for(x=1, 10001, if(A062375(x)==6, print1(x, ", ")))
|
|
CROSSREFS
|
Cf. A000010, A002322, A034380, A033948, A033948, A062373-A062377.
Sequence in context: A043186 A039363 A043966 this_sequence A039480 A023688 A118157
Adjacent sequences: A062372 A062373 A062374 this_sequence A062376 A062377 A062378
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Vladeta Jovovic (vladeta(AT)Eunet.yu), Jun 17 2001
|
|
EXTENSIONS
|
More terms from Randall L. Rathbun, Jan 12 2002
|
|
|
Search completed in 0.002 seconds
|