1,1

Next term is greater than 50000 - Sam Handler (sam_5_5_5_0(AT)yahoo.com), Dec 05 2004

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

Do[ If[ PrimeQ[2^n - Prime[n]], Print[n]], {n, 1, 10^5}]

Cf. A077375.

Sequence in context: A071916 A113295 A043433 * A017101 A112422 A289840

Adjacent sequences: A078580 A078581 A078582 * A078584 A078585 A078586

nonn

Robert G. Wilson v, Nov 30 2002

More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Dec 05 2004

approved