OFFSET
1,1
COMMENTS
Necessarily (as sod(1331) = 3 * 2 + 2): p = 6 * k - 1
See comments and references for A174213
EXAMPLE
231331 = prime(20545) => p(1) = 23 = prime(9)
291331 = prime(25334) => p(2) = 29 = prime(10)
MATHEMATICA
Select[Prime[Range[300]], PrimeQ[1331+10000#]&] (* Harvey P. Dale, Jun 22 2013 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Eva-Maria Zschorn (e-m.zschorn(AT)zaschendorf.km3.de), Mar 14 2010
STATUS
approved