|
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
If n is in A074583, n can be expressed as n = p^e (p>=e) using the prime p.
On the other hand, the terms of this sequence are factorized as follows.
72 = 2^3 * 3^2.
2025 = 3^4 * 5^2.
78447 = 3 * 79 * 331.
5922181 = 71 * 239 * 349.
84238825 = 5^2 * 11 * 17 * 37 * 487.
|
|
PROG
|
(PARI) isok(n) = my(f=factor(n)); sumdiv(n, d, Mod(d, n)^d)==1 && n>1 && !(#f~==1 && f[1, 1]>=f[1, 2]);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|