OFFSET
1,2
LINKS
Jinyuan Wang, Table of n, a(n) for n = 1..500
MATHEMATICA
Table[SelectFirst[10#+9&/@FromDigits/@Tuples[{8, 9}, n-1], PrimeQ], {n, 20}]/. (Missing["NotFound"]->0) (* Harvey P. Dale, Feb 01 2018 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jan 04 1999
STATUS
approved