login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes of the form 2^p-p*q where p is prime,q=5.
3

%I #5 Jul 02 2018 14:17:03

%S -7,7,1993,130987,536870767,9007199254740727

%N Primes of the form 2^p-p*q where p is prime,q=5.

%t q=5;lst={};Do[p=Prime[n];If[PrimeQ[p=2^p-p*q],AppendTo[lst,p]],{n,5!}];lst

%t Select[Table[2^p-5p,{p,Prime[Range[50]]}],PrimeQ] (* _Harvey P. Dale_, Jul 02 2018 *)

%Y Cf. A057664, A155841, A155842, A155843, A155844, A057678, A155845

%K sign

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Jan 28 2009