This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A065818 Numbers k such that 3*phi(k) = 2*sigma(k). 4
 5, 119, 3553, 4147, 8323, 198679, 218569, 248501, 298129, 468809, 547261, 1098349, 1398061, 1947379, 1990417, 3076549, 3453289, 3994753, 6969529, 7690249, 8790439, 11905457, 13097327, 14346577, 14732011, 14988967, 15286973, 16145269, 20851493, 21622867, 23083081, 24924599, 26218777, 26326867 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Jud McCranie, Table of n, a(n) for n = 1..10000 (first 75 terms from Harry J. Smith) EXAMPLE n = 3553, 3*phi(3553) = 8640 = 2*4320 = 2*sigma(3553). MATHEMATICA Select[Range[20000000], 3EulerPhi[#] == 2DivisorSigma[1, #] &]  (* Harvey P. Dale, Apr 18 2011 *) PROG (PARI) { n=0; for (m=1, 10^9, if (3*eulerphi(m) == 2*sigma(m), write("b065818.txt", n++, " ", m); if (n==75, return)) ) } \\ Harry J. Smith, Oct 31 2009 CROSSREFS Cf. A000010, A000203, A062699, A065819. Sequence in context: A212040 A067359 A156962 * A139189 A155202 A168599 Adjacent sequences:  A065815 A065816 A065817 * A065819 A065820 A065821 KEYWORD nonn AUTHOR Labos Elemer, Nov 23 2001 EXTENSIONS a(22)-a(28) from Harry J. Smith, Oct 31 2009 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 18 12:18 EDT 2019. Contains 328160 sequences. (Running on oeis4.)