OFFSET
1,1
COMMENTS
For k = p_i^i we have i/i = 1, thus A062457 is a subsequence of this sequence.
LINKS
Sean A. Irvine, Table of n, a(n) for n = 1..1000
EXAMPLE
For k = 125 = 5^3 we have 3/3 = 1 thus k = 125 is a term.
For k = 216 = 2^3 * 3^3 we have 1/3 + 2/3 = 1 thus k = 216 is a term.
PROG
(PARI) isok(k) = my(f=factor(k)); sum(i=1, #f~, primepi(f[i, 1])/f[i, 2]) == 1; \\ Michel Marcus, Oct 14 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
Ctibor O. Zizka, Oct 14 2025
STATUS
approved
