A067202 Numbers n such that sigma(n) = phi(n) + phi(n-1) + phi(n-2).

3, 82, 1898, 2457, 4294, 4526, 4748, 8494, 14798, 15566, 16095, 34988, 97402, 883082, 1015658, 1121686, 2699445, 3090945, 3714454, 5668598, 10376835, 13032398, 32290154, 40250422, 123960795, 150301604, 157673985, 165102854, 167691466, 235444618, 289453814

Offset

1,1

Links

Table of n, a(n) for n=1..31.

Example

sigma(82) = 126 = 40 + 54 + 32 = phi(82) + phi(82-1) + phi(82-2), so 82 is a term of the sequence.

Mathematica

Select[Range[3, 10^5], EulerPhi[ # ] + EulerPhi[ # - 1] + EulerPhi[ # - 2] == DivisorSigma[1, # ] &]

Crossrefs

Sequence in context: A134799 A055590 A037111 * A203494 A319836 A356503

Adjacent sequences: A067199 A067200 A067201 * A067203 A067204 A067205

Keyword

nonn

Author

Joseph L. Pe, Feb 19 2002

Extensions

a(14)-a(28) from Donovan Johnson, Feb 05 2010

a(29)-a(31) from Donovan Johnson, Feb 08 2012

Status

approved