OFFSET
1,1
EXAMPLE
29 is a member since the next prime is 31, 31 - 29 = 2, and 29 begins with 2.
18233 is the smallest prime that begins with 18 and is followed by an 18-gap.
MAPLE
A162357 := proc(n) local a, b, p; a := 2*n; for d from 1 do for b from 1 to 10^d by 2 do p := a*10^d+b ; if isprime(p) then if nextprime(p)-p = 2*n then RETURN(p) ; fi; fi; od: od: end: for n from 1 do printf("%d, \n", A162357(n)) ; od: # R. J. Mathar, Jul 06 2009
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Ki Punches, Jul 01 2009
EXTENSIONS
Edited by N. J. A. Sloane, Jul 05 2009
Extended by Ray Chandler, Jul 08 2009
1237 replaced by 1201 and extended beyond a(24) by R. J. Mathar, Jul 06 2009
Definition modified by Harvey P. Dale, Jan 24 2019
STATUS
approved