OFFSET
1,2
COMMENTS
LINKS
Rémy Sigrist, Table of n, a(n) for n = 1..10000
Rémy Sigrist, Colored logarithmic scatterplot of the first 1000000 terms (where the color is function of A062760(n))
EXAMPLE
PROG
(PARI) a(n) = { my(f=factor(n)); if(#f~<=1, return(n), my(mi=vecmin(f[, 2]), ma=vecmax(f[, 2])); return(prod(i=1, #f~, f[i, 1]^(ma+mi-f[i, 2])))) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Rémy Sigrist, Nov 22 2017
STATUS
approved