OFFSET
1,1
COMMENTS
Primes not in A393975.
Leading zeros are not allowed in anagrams.
We expect that most large primes are not terms.
If p and q are the greatest prime < 10^d and least prime > 10^d respectively, any prime between 10^d + p and 10^d + q must be a term. Thus we expect there to be infinitely many terms.
LINKS
Robert Israel, Table of n, a(n) for n = 1..9428
EXAMPLE
a(6) = 13 is a term because there is no prime p such that 13 - p is an anagram of p.
MAPLE
g:= proc(n) local d, L, i;
L:= convert(n, base, 10); d:= nops(L);
select(isprime, convert(map(t -> n + add(t[i]*10^(i-1), i=1..d), select( t -> t[-1] <> 0, combinat:-permute(L))), set))
end proc:
P:= select(isprime, {2, seq(i, i=3..10^4, 2)}): S:= P:
for p in P do S:= S minus g(p); od:
sort(convert(S, list));
CROSSREFS
KEYWORD
AUTHOR
Robert Israel, Mar 15 2026
STATUS
approved
