OFFSET
1,1
LINKS
EXAMPLE
Prime 317 is in the sequence because J(317, 713) = J(713, 317) = 1 where J is the Jacobi symbol.
MAPLE
with(numtheory): for n from 1 to 2500 do: s:=0:l:=length(n):for q from 0 to l do:x:=iquo(n, 10^q):y:=irem(x, 10):s:=s+y*10^(l-1-q): od: if s<>n and quadres(n, s)=1 and quadres(s, n)=1 and type(n, prime)=true then printf(`%d, `, n):else fi:od:
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Lagneau, Dec 13 2010
STATUS
approved