OFFSET
1,1
LINKS
Jens Kruse Andersen, Table of n, a(n) for n = 1..10000
EXAMPLE
1237 is in the sequence because it is prime and abs((7+2)-(3+1)) = 5 is prime
MAPLE
Df:=proc(N) j:=1; for n from 1 while j<=N do B:= convert(ithprime(n), base, 10); ap:=-(sum(B[2*i], i=1..nops(B)/2)-sum(B[2*n+1], i=0..(nops(B)-1)/2)); if (isprime(abs(ap)) = true) then a[j]:=ithprime(n); j:=j+1; fi; od; end:
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Paolo P. Lava and Giorgio Balzarotti, Jan 20 2006
STATUS
approved