OFFSET
1,3
COMMENTS
a(332) = -1.
MAPLE
From R. J. Mathar, Apr 25 2010: (Start)
A102700 := proc(n) option remember; if n = 1 then 1; else for a from procname(n-1)+1 do if isprime(10*a+9) then return a; end if; end do: end if; end proc:
A102342 := proc(n) option remember; if n = 1 then 0; else for a from procname(n-1)+1 do if isprime(10*a+7) then return a; end if; end do: end if; end proc:
CROSSREFS
KEYWORD
sign
AUTHOR
Juri-Stepan Gerasimov, Jun 09 2008
EXTENSIONS
Corrected (a 6 replaced by 7, a 7 by 9, a 13 by 16) and extended by R. J. Mathar, Apr 25 2010
STATUS
approved