|
Search: id:A076647
|
|
|
| A076647 |
|
Numbers n such that phi(n) + phi(n+1) = sigma(n)/2. |
|
+0 1
|
|
| 56, 456, 476, 828, 846, 1196, 2060, 2780, 4484, 7530, 9174, 11420, 11475, 11865, 13454, 22154, 34916, 35385, 52185, 67308, 105798, 140895, 168872, 190840, 219852, 241892, 244074, 267225, 303834, 317564, 330484, 335440, 460292, 580970, 658515
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
phi(56) + phi(57) = 24 + 36 = 60 = 1/2 sigma(56), so 56 is a term of the sequence.
|
|
MAPLE
|
with(numtheory): p:=proc(n) if phi(n)+phi(n+1)=sigma(n)/2 then n else fi end: seq(p(n), n=1..2500000); (Deutsch)
|
|
MATHEMATICA
|
Select[Range[10^5], EulerPhi[ # ] + EulerPhi[ # + 1] == (1/2)DivisorSigma[1, # ] &]
|
|
CROSSREFS
|
Sequence in context: A088833 A075283 A008447 this_sequence A067234 A048540 A005931
Adjacent sequences: A076644 A076645 A076646 this_sequence A076648 A076649 A076650
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Oct 23 2002
|
|
EXTENSIONS
|
More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Sep 02 2005
|
|
|
Search completed in 0.002 seconds
|