OFFSET
1,1
MAPLE
MATHEMATICA
Select[Range[2000], PrimeQ[(Prime[#]-11)/10]&] (* Harvey P. Dale, Jan 13 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jul 04 2010
STATUS
approved