

A155847


Primes of the form 2^pp*q where p is prime,q=7.


2




OFFSET

1,1


LINKS

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


MATHEMATICA

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


CROSSREFS

Cf. A057664, A155841, A155842, A155843, A155844, A057678, A155845, A155846
Sequence in context: A272175 A297874 A298137 * A329983 A204594 A204157
Adjacent sequences: A155844 A155845 A155846 * A155848 A155849 A155850


KEYWORD

sign


AUTHOR

Vladimir Joseph Stephan Orlovsky, Jan 28 2009


STATUS

approved



