OFFSET
1,2
COMMENTS
Numbers k such that prime(k) - (even nonprime)(k) is prime.
EXAMPLE
MAPLE
A163300 := proc(n) option remember ; if n = 1 then 0; else for a from procname(n-1)+2 by 2 do if not isprime(a) then return a ; end if; end do; end if; end proc:
for n from 1 to 300 do if isprime( ithprime(n) - A163300(n)) then printf("%d, ", n) ; end if; end do: # R. J. Mathar, Apr 20 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Mar 11 2010
EXTENSIONS
Corrected (11 replaced with 12) by R. J. Mathar, Apr 20 2010
STATUS
approved