OFFSET
1,1
COMMENTS
Terms are all present in A337372, i.e., are primitively prime-shift abundant.
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..170
PROG
(PARI) A378745(n) = { my(p=prime(n), q=prime(1+n)); for(k=1, oo, if(q^k > 2*(p^k), return(p^k))); };
CROSSREFS
KEYWORD
nonn,new
AUTHOR
Antti Karttunen, Dec 08 2024
STATUS
approved