OFFSET
1,1
COMMENTS
EXAMPLE
PROG
(PARI) A071363(n, u=vectorv(n, i, 10^(n-i)))={forvec(d=vector(n, i, [1, 9]), isprime(d*u)&&n=d*u, 2); n} \\ M. F. Hasler, May 03 2017
CROSSREFS
KEYWORD
base,fini,full,nonn
AUTHOR
Rick L. Shepherd, May 21 2002
STATUS
approved