OFFSET
1,1
LINKS
R. J. Mathar, Table of n, a(n) for n = 1..417
PROG
(PARI) lista(lim)=my(v=List(), t, k); for(n=2, sqrt(lim), t=1+n; k=1; while((t+=n^k++)<=lim, if(isprime(t) && isprime(t-2), listput(v, t)))); v = vecsort(Vec(v), , 8); \\ Michel Marcus, Mar 15 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Marcus, Mar 15 2019
STATUS
approved