A109404 Numbers n such that sum of n-th and (n+1)-st semiprimes is a prime.

3, 5, 7, 8, 10, 11, 13, 22, 25, 27, 29, 37, 46, 51, 52, 76, 83, 86, 92, 104, 111, 113, 115, 123, 132, 140, 149, 190, 213, 218, 222, 233, 242, 274, 280, 281, 286, 298, 303, 307, 309, 336, 340, 346, 351, 379, 381, 395, 402, 415, 424, 444, 449, 463, 477, 478, 490

Offset

1,1

Links

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

Example

3 is OK because sp(3)=9, sp(3)=10 and 9+10=19 (prime); sp(n)=n-th semiprime.

Mathematica

With[{semis=Partition[Select[Range[2000], PrimeOmega[#]==2&], 2, 1]}, Flatten[ Position[ semis, _?(PrimeQ[Total[#]]&), {1}, Heads->False]]] (* Harvey P. Dale, May 01 2014 *)

Prog

(PARI) lista(nn) = {vec = vector(nn, i, i); sp = select(i->(bigomega(i)==2), vec); for (i = 1, #sp-1, if (isprime(sp[i]+sp[i+1]), print1(i, ", ")); ); } \\ Michel Marcus, Oct 06 2013

Crossrefs

Cf. A092191 = numbers n such that sum of n-th and (n+1)-st semiprimes is a semiprime.

Sequence in context: A257019 A071977 A183423 * A221056 A288467 A276224

Adjacent sequences: A109401 A109402 A109403 * A109405 A109406 A109407

Keyword

nonn

Author

Zak Seidov, Jun 27 2005

Status

approved