|
Search: id:A076529
|
|
|
| A076529 |
|
phi(n) = phi(n+1) - phi(n-1). |
|
+0 1
|
|
| 4, 6, 10, 16, 22, 36, 40, 46, 100, 136, 232, 256, 856, 1036, 1296, 1540, 1600, 2016, 4336, 6526, 9178, 14400, 16096, 30496, 55386, 61132, 62800, 65536, 72580, 77616
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
phi(22) = 10 phi(23) = 22 phi(21) = 12 and 10 = 22 - 12; hence 22 is a term of the sequence.
|
|
MATHEMATICA
|
Select[Range[3, 10^5], EulerPhi[ # ] == EulerPhi[ # + 1] - EulerPhi[ # - 1] &], # - 2] &]
|
|
CROSSREFS
|
Sequence in context: A028282 A024905 A107305 this_sequence A102768 A075637 A027689
Adjacent sequences: A076526 A076527 A076528 this_sequence A076530 A076531 A076532
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Oct 18 2002
|
|
|
Search completed in 0.002 seconds
|