A155937 -id:A155937 - cp's OEIS frontend

A155939 Numbers k such that 13*k + 8 is not a prime.

0, 1, 2, 4, 6, 7, 8, 9, 10, 12, 13, 14, 15, 16, 18, 19, 20, 22, 24, 25, 26, 28, 29, 30, 31, 32, 33, 34, 36, 37, 38, 39, 40, 42, 43, 44, 46, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 64, 66, 67, 68, 69, 70, 71, 72, 73, 74, 76, 78, 79, 80, 82, 84, 85, 86, 87, 88

Offset: 1

Vincenzo Librandi, Jan 31 2009

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Cf. A092178, A155937 (complement).

[n: n in [0..90] |not IsPrime(13*n + 8)]; // Vincenzo Librandi, Oct 15 2012

Select[Range[0, 90], !PrimeQ[13 # + 8] &] (* Vincenzo Librandi, Oct 15 2012 *)

A155938 Primes p such that 13*p + 8 is also prime.

Original entry on oeis.org

3, 5, 11, 17, 23, 41, 47, 83, 101, 107, 137, 167, 233, 251, 311, 317, 347, 353, 383, 467, 503, 521, 587, 593, 647, 683, 761, 797, 857, 941, 1013, 1031, 1103, 1181, 1187, 1223, 1301, 1433, 1493, 1571, 1607, 1721, 1847, 1907, 1913, 1931, 1973, 1997, 2081, 2153

Offset: 1

Vincenzo Librandi, Jan 31 2009

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Cf. A092178, A155937, A155939.

[p: p in PrimesUpTo(2200)| IsPrime(13*p + 8)]; // Vincenzo Librandi, Oct 30 2012

Select[Prime[Range[2500]], PrimeQ[(13*# + 8)]&] (* Vincenzo Librandi, Oct 30 2012 *)

cp's OEIS Frontend

A155939 Numbers k such that 13*k + 8 is not a prime.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica