OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Wikipedia, Primorial number system.
EXAMPLE
227 is a term since it is a prime number and its representation in primorial base is 10221, whose reversal, 12201, is the primorial base representation of another prime number, 283.
MATHEMATICA
max = 7; bases = Prime @ Range[max, 1, -1]; nmax = Times @@ bases - 1; emirpQ[n_] := PrimeQ[n] && Module[{d = IntegerDigits[n, MixedRadix[bases]]}, r = Reverse @ d; IntegerDigits[(m = FromDigits[r, MixedRadix[bases]]), MixedRadix[bases]] == r && m != n && PrimeQ[m]]; Select[Range[nmax], emirpQ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Mar 20 2020
STATUS
approved