A172458 Nonprimes n such that exactly one of 2n-1 and 2n+1 is prime.

1, 4, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 27, 33, 34, 35, 39, 40, 42, 44, 45, 48, 49, 50, 52, 55, 56, 57, 63, 64, 65, 66, 68, 70, 74, 76, 78, 81, 82, 84, 86, 87, 91, 95, 98, 100, 105, 106, 111, 112, 115, 116, 117, 119, 121, 125, 126, 128, 129, 132, 134, 136, 138, 140

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[150], !PrimeQ[#]&&Total[Boole[PrimeQ[2 #+{1, -1}]]]==1&] (* Harvey P. Dale, Aug 27 2024 *)

Crossrefs

Sequence in context: A029886 A102218 A257586 * A175226 A057166 A358228

Adjacent sequences: A172455 A172456 A172457 * A172459 A172460 A172461

Keyword

nonn,easy,less

Author

Juri-Stepan Gerasimov, Feb 03 2010

Extensions

Edited by Charles R Greathouse IV, Mar 25 2010

Status

approved