cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A157345 Semiprimes that are the product of two distinct non-Sophie Germain primes.

Original entry on oeis.org

91, 119, 133, 217, 221, 247, 259, 301, 323, 329, 403, 413, 427, 469, 481, 497, 511, 527, 553, 559, 589, 611, 629, 679, 703, 707, 721, 731, 749, 763, 767, 793, 799, 817, 871, 889, 893, 923, 949, 959, 973, 1003, 1027, 1037, 1043, 1057, 1099, 1121, 1139, 1141
Offset: 1

Views

Author

Keywords

Comments

91 = 7*13; 7 and 13 are not Sophie Germain primes, ...

Crossrefs

Programs

  • Mathematica
    lst={};Do[If[Plus@@Last/@FactorInteger[n]==2,a=Length[First/@FactorInteger[n]];If[a==2,b=First/@FactorInteger[n];c=b[[1]];d=b[[2]];If[ !PrimeQ[2*c+1]&&!PrimeQ[2*d+1],AppendTo[lst,n]]]],{n,7!}];lst
    With[{nn=50},Take[Union[Times@@@Subsets[Select[Prime[Range[nn]], !PrimeQ[ 2#+1]&],{2}]],nn]] (* Harvey P. Dale, May 04 2015 *)