login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A100350
Primes p such that p-2^k is a prime or semiprime for all k > 0 with 2^k < p.
3
7, 11, 13, 19, 23, 37, 41, 73
OFFSET
1,1
COMMENTS
These are the primes in A100349. No others < 10^9; conjecture that this sequence is finite.
EXAMPLE
37 is here because 37-2, 37-4, 37-16 are semiprimes and 37-8, 37-32 are primes.
MATHEMATICA
SemiPrimeQ[n_Integer] := If[Abs[n]<2, False, (2==Plus@@Transpose[FactorInteger[Abs[n]]][[2]])]; lst={}; Do[k=1; While[n=Prime[i]; p=n-2^k; p>0 && (SemiPrimeQ[p] || PrimeQ[p]), k++ ]; If[p<=0, AppendTo[lst, n]], {i, 2, 1000}]; lst
CROSSREFS
Cf. A039669 (n such that n-2^k is prime), A100349 (n such that n-2^k is prime or semiprime), A100351 (n such that n-2^k is semiprime).
Sequence in context: A063911 A087489 A155488 * A084467 A245179 A297177
KEYWORD
more,nonn
AUTHOR
T. D. Noe, Nov 18 2004
STATUS
approved