%I A092125
%S A092125 91,119,141,183,201,213,215,217,287,299,301,319,391,411,413,469,515,533,
%T A092125 579,667,685,695,789,813,1055,1077,1133,1135,1137,1145,1165,1203,1253,
%U A092125 1313,1343,1345,1347,1383,1385,1387,1389,1401,1561,1639,1685,1687,1761
%N A092125 Numbers n such that n, n+2, n+4 are semiprimes.
%C A092125 Semiprimes in arithmetic progression. All terms are odd, see also A056809.
%t A092125 PrimeFactorExponentsAdded[n_] := Plus @@ Flatten[Table[ #[[2]], {1}]
& /@ FactorInteger[n]]; Select[ Range[ 1792], PrimeFactorExponentsAdded[
# ] == PrimeFactorExponentsAdded[ # + 2] == PrimeFactorExponentsAdded[
# + 4] == 2 &] (from Robert G. Wilson v Feb 24 2004)
%Y A092125 Cf. A056809, A070552, A092126, A092127, A092128, A092129.
%Y A092125 Sequence in context: A161945 A140389 A157345 this_sequence A005935 A020307
A020235
%Y A092125 Adjacent sequences: A092122 A092123 A092124 this_sequence A092126 A092127
A092128
%K A092125 easy,nonn
%O A092125 1,1
%A A092125 Zak Seidov (zakseidov(AT)yahoo.com), Feb 22 2004
|