OFFSET
1,1
COMMENTS
The last term in the sequence is a(2003) = 666276812967623946997.
LINKS
Nathaniel Johnston, Table of n, a(n) for n = 1..2003 (full sequence)
MAPLE
a:=[[2], [3], [7]]: s:=[1, 2, 3, 4, 6, 7, 8, 9]: l1:=1: l2:=3: for n from 1 to 4 do for k from 1 to 8 do for j from l1 to l2 do d:=[op(a[j]), s[k]]: if(isprime(op(convert(d, base, 10, 10^nops(d)))))then a:=[op(a), d]: fi: od: od: l1:=l2+1: l2:=nops(a): if(l1>l2)then break: fi: od: seq(op(convert(a[j], base, 10, 10^nops(a[j]))), j=1..nops(a)); # Nathaniel Johnston, Jun 21 2011
CROSSREFS
KEYWORD
nonn,base,fini,full,easy
AUTHOR
EXTENSIONS
Corrected terms and statement about last term, Nathaniel Johnston, Jun 22 2011.
STATUS
approved