OFFSET
1,2
COMMENTS
From Bernard Schott, May 07 2021: (Start)
a(n) depends only on prime factors of n (see formulas).
Primes are fixed points of this sequence.
Terms are in increasing order in A344023. (End)
LINKS
Michel Marcus, Table of n, a(n) for n = 1..10000
FORMULA
EXAMPLE
a(60) = 136 because the distinct prime factors of 60 are {2, 3, 5} and 2^1 + 3^2 + 5^3 = 136.
MAPLE
a:= n-> (l-> add(l[i]^i, i=1..nops(l)))(sort(map(i-> i[1], ifactors(n)[2]))):
seq(a(n), n=1..73); # Alois P. Heinz, Sep 19 2024
MATHEMATICA
{0}~Join~Table[Total[(a=First/@FactorInteger[k])^Range@Length@a], {k, 2, 100}]
PROG
(PARI) a(n) = my(f=factor(n)); sum(k=1, #f~, f[k, 1]^k); \\ Michel Marcus, Apr 11 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Giorgos Kalogeropoulos, Apr 11 2021
STATUS
approved