OFFSET
1,2
COMMENTS
The class of recurrence sequences a(n+1)=sopfr(C*a(n)+D) may finish with a fixed point or with a cycle.
FORMULA
a(n+1)=A001414(2*a(n)+1)
MATHEMATICA
sopfr = Function[x, Plus @@ Map[Times @@ # &, FactorInteger[x]]]; NestList[sopfr[2# + 1] &, 1, 10]
CROSSREFS
KEYWORD
fini,full,nonn
AUTHOR
Carlos Alves, Dec 16 2007
STATUS
approved