A116050 n+sigma(n)+sigma(sigma(n)) is a prime.

1, 4, 5, 8, 10, 16, 18, 22, 23, 27, 29, 32, 36, 41, 46, 50, 53, 65, 66, 70, 94, 99, 101, 106, 111, 113, 125, 129, 131, 137, 171, 183, 195, 197, 200, 201, 203, 209, 210, 221, 233, 237, 239, 245, 251, 269, 275, 299, 301, 309, 317, 321, 322, 327, 329, 333, 335

Offset: 1

Author

Giovanni Resta, Feb 13 2006

Keywords

• nonn

Examples

			8 + sigma(8) + sigma(sigma(8)) = 47.
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A078762.

Programs

Mathematica

dsQ[n_]:=Module[{dsn=DivisorSigma[1,n]},PrimeQ[n+dsn+DivisorSigma[1,dsn]]]; Select[Range[400],dsQ] (* Harvey P. Dale, May 15 2013 *)