OFFSET
1,1
COMMENTS
There are 18 digit pairs which can produce such primes. (1,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9),(8,9).
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..5353
MATHEMATICA
Sort[Flatten[Table[Select[FromDigits/@Permutations[Flatten[Table[{5, 9}, {n}]]], PrimeQ], {n, 5}]]] (* Harvey P. Dale, May 31 2013 *)
PROG
(PARI) \\ Needs B() from A087510.
concat(vector(6, k, B(k, 5, 9, isprime))) \\ Andrew Howroyd, Sep 20 2024
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Paul D. Hanna and Amarnath Murthy, Sep 12 2003
EXTENSIONS
Offset changed and a(20) onwards from Andrew Howroyd, Sep 20 2024
STATUS
approved