|
| |
|
|
A065986
|
|
Numbers n such that Sigma(n) = EulerPhi(n+1) + EulerPhi(n) + EulerPhi(n-1).
|
|
1
| |
|
|
6, 147, 286, 376, 534, 738, 805, 2392, 2406, 4324, 8214, 9606, 10362, 12126, 16263, 17511, 27639, 29151, 39215, 48616, 60687, 61132, 61915
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,60
|
|
|
EXAMPLE
| Sigma(6) = 12 = 6 + 2 + 4 = EulerPhi(7) + EulerPhi(6) + EulerPhi(5).
|
|
|
PROG
| (PARI) { n=e1=e2=0; for (m=2, 10^9, e2=e1; e1=e; e=eulerphi(m+1); if (sigma(m) == e + e1 + e2, write("b065986.txt", n++, " ", m); if (n==1000, return)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 05 2009]
|
|
|
CROSSREFS
| Cf. A000010.
Sequence in context: A166809 A063419 A099185 * A199226 A012791 A089480
Adjacent sequences: A065983 A065984 A065985 * A065987 A065988 A065989
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Dec 10 2001
|
| |
|
|