OFFSET
1,1
COMMENTS
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
filter:= n -> isprime(n) and isprime(n + 2^ilog2(n)):
select(filter, [seq(i, i=3..10000, 2)]); # Robert Israel, Mar 14 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Nov 23 2008
EXTENSIONS
Extended by Ray Chandler, Nov 26 2008
STATUS
approved