%I A115093
%S A115093 13,19,31,37,53,67,83,89,109,113,127,131,139,157,181,199,211,233,251,
%T A115093 257,263,293,307,317,337,353,379,389,401,409,443,449,467,479,487,491,
%U A115093 499,503,509,541,557,563,571,577,587,631,647,653,677,683,701,719,743
%N A115093 Primes of the form p*q-2, where p and q are distinct primes.
%C A115093 This sequence is a subset of A063637, which is the union of this sequence
and A049002.
%t A115093 SemiPrimeQ[n_] := (n>1) && (2==Plus@@(Transpose[FactorInteger[n]][[2]]));
Select[Prime[Range[150]], SemiPrimeQ[ #+2] && !IntegerQ[Sqrt[ #+2]]&]
%Y A115093 Cf. A049002 (primes of the form p^2-2, where p is prime), A063637 (primes
of the form p*q-2 where p and q are primes).
%Y A115093 Sequence in context: A102764 A164318 A092738 this_sequence A158195 A040092
A079130
%Y A115093 Adjacent sequences: A115090 A115091 A115092 this_sequence A115094 A115095
A115096
%K A115093 nonn
%O A115093 1,1
%A A115093 T. D. Noe (noe(AT)sspectra.com), Mar 01 2006
|