OFFSET
1,1
MATHEMATICA
Select[Prime[Range[100]], !PrimeQ[#+38]&] (* Harvey P. Dale, Feb 02 2019 *)
PROG
(Magma) [p: p in PrimesUpTo(1000)|not IsPrime(p+38)] // Vincenzo Librandi, Dec 18 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jul 03 2008
EXTENSIONS
Corrected (19, 349 inserted) by R. J. Mathar, Apr 25 2010
STATUS
approved