A155140 Primes p such that both p-+4 are not squarefree.

293, 347, 571, 829, 1021, 1229, 1327, 1373, 1471, 1621, 2111, 2129, 2371, 2531, 2579, 2879, 2887, 3181, 3271, 3929, 4621, 4801, 4909, 5279, 5333, 5521, 5639, 5683, 5827, 6133, 6421, 6521, 6709, 6863, 6871, 7079, 7321, 7529, 7591, 8179, 8221, 8429, 8963

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jan 21 2009

Keywords

• nonn

Links

• John Cerkan, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A153213, A049282, A155139, A155141, A155142.

Programs

Mathematica

<Harvey P. Dale, Jul 17 2024 *)

PARI

lista(nn) = forprime(p=2, nn, if (! issquarefree(p-4) && ! issquarefree(p+4), print1(p, ", "))); \\ Michel Marcus, Jul 05 2016