OFFSET
1,2
LINKS
M. F. Hasler, Table of n, a(n) for n = 1..858 (all terms up to 10^7).
PROG
(PARI) A192139=[1]; forprime(p=1, M=1e7, p==A004086(p) && A192139=setunion(A192139, vector(log(M)\log(p), k, p^k))) \\ M. F. Hasler, May 11 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Jun 24 2011
EXTENSIONS
Missing term 625 inserted and more terms added by M. F. Hasler, May 11 2015
STATUS
approved