A174653 Semiprimes s such that neither s-1 nor s+1 is semiprime.
4, 6, 46, 49, 51, 55, 62, 65, 69, 74, 77, 82, 91, 106, 111, 115, 129, 155, 161, 166, 169, 183, 185, 187, 194, 209, 221, 226, 235, 237, 247, 249, 259, 262, 265, 267, 274, 278, 287, 289, 291, 295, 305, 309, 314, 319, 321, 323, 329, 339, 341, 346, 355, 358, 365
Offset: 1
Keywords
Examples
a(1)=4 because 4-1 = 3 (not semiprime) and 4+1 = 5 (not semiprime).
Links
- R. Zumkeller, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Mean/@SequencePosition[Table[If[PrimeOmega[n]==2,1,0],{n,400}],{0,1,0}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 19 2019 *)
Extensions
Corrected by Reinhard Zumkeller and Ray Chandler, Apr 07 2010
Comments